Complete la matriz Excel VB con rango

Question

Tengo una matriz (2100) en Excel VB.

Me gustaría completarlo con dos rangos de celdas, como:

MyArray(1, i) = Range("a1:a100").Value
MyArray(2, i) = Range("x1:x100").Value

Claramente, ese código no funcionará y es solo para ilustración. ¿Cómo debo hacer para incorporar esos dos rangos de celdas a mi matriz?

Answer 1

for i = 1 to 100
    MyArray(1, i) = Range("A" & i).Value
    MyArray(2, i) = Range("X" & i).Value
next i