Preencher matriz do Excel VB com intervalo

Question

Eu tenho um array (2,100) no Excel VB.

Eu gostaria de preenchê-lo com dois intervalos de células, como:

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

É evidente que o código não funciona e é apenas para ilustração. Como devo proceder para puxar esses dois intervalos de células para o meu array?

    

Answer 1

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