excel - VBAvalues 从多维数组到特定范围

Question

我的数组有四列数据。
我想将一整行粘贴到 Excel 中。 (虽然不是整个数组)

目前我用 4 行代码来做，但我怀疑可能有一个简单的单行代码。

        Cells(i, 1).Value = myArry(i, 1)
        Cells(i, 2).Value = myArry(i, 2)
        Cells(i, 3).Value = myArry(i, 3)
        Cells(i, 4).Value = myArry(i, 4)

你能提出一个更简单的解决方案吗？
先感谢您。

附:欢迎对帖子进行编辑。

Answer 1

您可以使用 Index从二维数组中提取一行(或列)

    Range(Cells(i, 1), Cells(i, 4)).Value = Application.Index(myArry, i)