Stuart McLachlan
stuart at lexacorp.com.pg
Tue Apr 19 19:35:56 CDT 2005
On 20 Apr 2005 at 9:24, connie.kamrowski at agric.nsw.go wrote: > > I get a subscript out of range on CheckInsFees > > Dim CheckInsFees As Variant > > MyCount = rsCheckFees.RecordCount > CheckInsFees = rsCheckFees.GetRows(MyCount) > > intCount = UBound(CheckInsFees, 2) + 1 I suspect that there are a couple of problems: You are not declaring CheckInsFees as an Array. Use "Dim CheckInsFees() " The default for an undimensioned array is 10 elements. If it is going to be any larger then you need to REDIM CheckInsFees(MyCount) -- Stuart