VBA - 将2D数组中的值放入2个或更多单元格

Question

我正在试图弄清楚如何将[N x 2]矩阵中的值放到不同工作表上同一行的单元格中。

更改的矩阵类似于：

1 0
1 2
1 3
2 0
2 1
2 2

......等等。

在另一张纸上，使用矩阵中的项目，我想创建一个省略零的向量，例如：

   A   B
1  1   1
2  1   2
3  1   3
4  2   1
5  2   2

......等等。

我已经有一个数组填充了矩阵中的值。我在尝试从数组中提取值时遇到问题。

最终，会有某些标准和一些组合，因此列和行的数量会增加。所以，我需要在VBA中这样做。任何人都可以指导我正确的方向或提供一些我可以参考的示例代码吗？

如果我需要澄清任何事情，请告诉我。

Answer 1

供参考的样本

Sub testArr()
    'Declare a 4-by-2 matrix
    Dim Data(3, 1) As Variant
    Dim i As Long, j As Long
    For i = 0 To UBound(Data, 1)
        For j = 0 To UBound(Data, 2)
            Data(i, j) = Int((10 - 1 + 1) * Rnd + 1)
        Next j
    Next i
    'You extract a value from the array like this
    MsgBox "data(2,1) = " & Data(2, 1)
End Sub