Заполните массив 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