将字符串数组复制到一系列单元格中(在使用VBA的MS Excel中)

Question

我可以使用一个For构造来遍历字符串数组元素并将它们的内容复制到该范围的各个单元格中; 但是有一种更简单的方法可以直接将字符串数组项复制到Range中吗？

问题范围到字符串数组解决了与我想要做的完全相反的问题.

Answer 1

像这样

Sub StringArrayToRange()

    Dim strArr(3) As String
    strArr(0) = "one"
    strArr(1) = "two"
    strArr(2) = "three"

    Range("A1:A" & UBound(strArr) + 1) = WorksheetFunction.Transpose(strArr)

End Sub

另外,这是更多的例子和教程

编辑:
此文档解释了WorksheetFunction.Transpose使用它的原因