data(i) is in a loop (sorry, i left a bunch of the code out), where
it loops through the array  and adds a sheet and renames it with the
value in the array. it then copies information from one worksheet,
and adds it to the worksheet  just added (named by the department in
the data array). there are 31 departments (these are accounted for
already), and the array has already been filled with the integer
number of the departments (e.g. 310). so the code looks more like
this:

for i = 1 to departments
Worksheets("Report - Acct Detail").Range("A1:Q8").Copy
Worksheets(Data(i)).Range("a1").PasteSpecial
next

also, the array is made up of all integers.

does that help?