VBA 二维数组整行赋值

你可以使用 VBA 中的 For 循环语句和数组的赋值语句来整行赋值一个二维数组。以下是一个示例代码：

Dim arr(1 To 3, 1 To 5) As String ' 定义一个 3 行 5 列的字符串数组
Dim i As Integer, j As Integer

' 假设要将第二行赋值为 "a", "b", "c", "d", "e"
For j = 1 To 5 ' 遍历第二行的每一列
  arr(2, j) = Chr(j + 96) ' 将对应列赋值为字母 a 到 e
Next j

上述代码中，我们定义了一个 3 行 5 列的字符串数组 `arr`，然后使用 For 循环遍历第二行的每一列，并将其赋值为对应的字母。你可以根据需要修改代码来适应你的具体情况。