vba 如何输出数组到单元格

可以使用以下代码将 VBA 中的数组输出到单元格中：

Sub ArrayToCells()
    Dim arr() As Variant
    Dim i As Long, j As Long
    arr = Array("A", "B", "C", "D") '将要输出的数组
    For i = 0 To UBound(arr)
        Range("A1").Offset(i, 0).Value = arr(i)
    Next i
End Sub

在这个例子中，我们将数组 `arr` 的值输出到了单元格 A1:A4 中。你可以根据自己的需求修改代码中的数组和单元格范围。