I am trying to create an array but am getting a data type
mismatch error on the ReDim statement. Can anyone tell me
why?

One other thing that may be important is that I have
declared Cust, DocNo, DrBr, etc as public variables at the
beginning of the module and assigned different data types
to the variables depending on the data in the particular
field.

Dim i As Integer
Dim Writeoffs()
JVCounter = 1
ReDim Writeoffs(1 To i, Cust, DocNo, DrBr, CrBr, _
DrAcctAmt, CrAcctAmt, DrAcctNo, CrAcctNo, Descr)

Any help would be greatly appreciated. Thanks.