vba 如何输出数组到单元格

要将 VBA 中的数组输出到 Excel 工作表中的单元格中，可以使用以下代码：

Sub OutputArray()
    Dim arr(1 To 3, 1 To 2) As Integer ' 定义一个二维数组
    
    ' 填充数组
    arr(1, 1) = 1
    arr(1, 2) = 2
    arr(2, 1) = 3
    arr(2, 2) = 4
    arr(3, 1) = 5
    arr(3, 2) = 6
    
    ' 输出数组到单元格
    Range("A1:B3").Value = arr
End Sub

在这个示例中，我们定义了一个 3 行 2 列的二维数组，并将其填充了一些值。然后，我们使用 Range 对象的 Value 属性将数组输出到工作表上的 A1:B3 单元格范围内。你可以根据自己的需要修改代码中的数组大小和单元格范围。