Заполнить массив Excel VB диапазоном

Question

У меня есть массив (2100) в Excel VB.

Я хотел бы заполнить его двумя диапазонами ячеек, например:

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

Очевидно, что этот код не будет работать и приведен только для иллюстрации. Как мне вставить эти два диапазона ячеек в мой массив?

Answer 1

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