[VBA] Setting 2nd dimention of a 2D-array

[faarikaal]

Hi there

Im trying for quite some time now to set the array in the 2nd dimention of a 2D-array to the result of a function which returns an array of dbl but i just can't get it to work.

The result of the Interpolate-function has the same length as mintSpan.

Any suggestions or comments are welcome... Thanks in advance

ReDim dblProductionRate(1 To 5, 1 To mintSpan)
 
For intHC = 1 To 5
        If CheckHC(intHC) And Owner.CheckHC(intHC) Then
            dblProductionRate(intHC) = InterpolateProductionProfile(intHC, mdblReserves(intHC), GetProfiles(intHC))

 

[RoryA]

Hi,
You have declared dblProductionRate as a 2D array, therefore to assign anything to an element of the array, you have to specify both dimensions. Alternatively, depending on your circumstances, it may be that you actually wanted a 1D array of arrays?

 

[faarikaal]

How would I then go about doing that? My head is so focused on 2D arrays im blind towards any other solution.

Im trying to use as little memory as possible and would like not to use variants.

 

[RoryA]

You would declare the variable as an array of arrays using:

Dim dblProductionRate(1 To 5) As Double()

then you would return your array as you are now.

 

[faarikaal]

I tried that initially but all i get is a compile error

 

[RoryA]

Sorry, I'm having a day of madness. You would declare it as Variant.

 

[faarikaal]

Dim dblProductionRate(1 To 5) As Variant() still gives my compile error.

BTW; thanks for quick replies. Im holding up a group of less then motvated Not-VBA-developers here

 

[Richard Schollar]

Drop the () on the end of the Variant:

Dim dblProductionRate(1 To 5) As Variant

 

[RoryA]

It's just:

Dim dblProductionRate(1 To 5) As Variant

 

[faarikaal]

Sorry; Im getting a bit confused here.

Is the variant then an array? How do i then reference i.e. the 10th element inside the Variant. Can you reference it like a Collection/Array?

I.e dblProductionRate(1)(10)?