如何将Range .copy Range转换为数组VBA

Question

我正在尝试创建一个数组，该数组的取值范围为（“ A1：D50”）。范围是示例，因为我使用的excel文件具有更大的范围

我有一个想法，就是我将创建2个数组并将它们分配给彼此，但不会给出我想要的结果。

Dim array1() As Variant
Dim array2() As Variant

For I =....
    For J=.....
        array1(I,1) = array2(J,1)
    Next J
Next I

Range("A" & I & ":AD" & I).Copy Range("A" & J & ":AD" & J)