Easy Array Question...
You want a dynamic array, so
You have to do it in two steps
Dim DataArray() as Double
Dim iFinalCount as Long
iFinalcount = 200
Redim DataArray( 1 to iFinalCount)
--
Regards,
Tom Ogilvy
"Jeff Harbin" wrote in message
...
I've got an range of cells of varying size made up of predominately
doubles
with a few strings sprinkled amongst the doubles. I need to sort through
the
array, determine the number of doubles in the array, and then populate an
array with the doubles.
I thought I could loop through the cells count the number of doubles,
store
the number of doubles as a variable (iFinalCount), and then Dim an Array
using the iFinalCount variable like so...
Dim DataArray(1 to iFinalCount) as Double
When I try to run the code I get the following error:
Compile Error
Constant Expression required
If I hit Debug it takes me to the iFinalCount in the Array dimensioning
statement.
Btw...iFinalCount is defined as an integer
Thanks,
Jeff
|