VBA dynamic 1-based array

Question

I am trying to create a dynamic range starting at 1. I do not want to use "Option 1" because the program also uses 0-based arrays.

I cannot use:

Dim arValues(1 To LastRow, 1 To LastColumn)

"compiler error: must be constant "

This also does not work:

Dim numbers(1 To 6, 1 To 4) As Variant)
ReDim numbers(3, 2)

I can do:

Dim numbers() As Variant
ReDim numbers(5, 3)
ReDim numbers(3, 2)

But not:

Dim numbers(5,3) As Variant      (or Dim numbers(1 To 6, 1 To 4) As Variant)
ReDim numbers(3, 2)

That does not make sense!

Any ideas?

Sorry, somehow the '''code''' thing does not work

Variatus · Accepted Answer · 2020-02-26 01:37:18Z

0

This is the way:-

Dim numbers() As Variant
ReDim numbers(1 To 6, 1 To 4)

In case you are thinking of making the array dynamic, note that only the last vector can be modified after the first ReDim.

answered Feb 26, 2020 at 1:37

Variatus

14.4k2 gold badges16 silver badges35 bronze badges

Sign up to request clarification or add additional context in comments.

1 Answer 1