VBA中如何把单元格区域的数值转化为数组
时间: 2024-10-15 15:27:16 浏览: 25
在VBA中,将单元格区域转换为数组非常简单,可以使用`Range.Value`属性来获取。这个属性会返回一个二维数组,每个一维数组代表一行,而每行又是一系列的数值。下面是一个基本的例子:
```vba
Sub ConvertRangeToArray()
Dim rng As Range
Set rng = ThisWorkbook.Sheets("Sheet1").Range("A1:C3") ' 设置你要转为数组的范围
Dim arr() As Variant
arr = rng.Value ' 将单元格区域的值赋给数组arr
' 现在你可以遍历数组,操作每一项数值
For i = LBound(arr, 1) To UBound(arr, 1)
For j = LBound(arr, 2) To UBound(arr, 2)
Debug.Print arr(i, j) ' 打印数组元素
Next j
Next i
End Sub
```
在这个例子中,`rng.Value`将"A1:C3"范围内的所有数值存储在一个三维数组中,你可以通过索引来访问它们。
阅读全文