excel - 将字符串数组复制到单元格区域中(在使用VBA的MS Excel中)

我可以使用For构造遍历字符串数组元素，并将其内容复制到范围的各个单元格中；但是有没有更简单的方法将字符串数组项直接复制到Range中？

问题Range to string array解决了与我尝试做的事情完全相反的问题。

最佳答案

像这样

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

另外，this有关更多示例和教程

编辑：
此documentation解释为什么使用WorksheetFunction.Transpose