excel vba range 取行列

在Excel VBA中，Range是工作表上用于操作一组单元格的对象。以下是取行列的一些基本示例：

1. 取一列（假设A列）[^1]:

Dim entireColumn As Range
Set entireColumn = Range("A:A")
Debug.Print "Entire column A:"; entireColumn(1, 1) ' 输出第1行的单元格值

这里`entireColumn(1, 1)`表示从A1开始的整个A列的第一个元素。

2. 取一行（假设第1行）:

Dim firstRow As Range
Set firstRow = Range("A1")
Debug.Print "First row:"; firstRow.Cells(1, 1).Value ' 输出第1行的所有单元格值

这里`firstRow.Cells(1, 1)`表示第1行的第1个单元格。

3. 多个单元格范围的取值:

Dim cellValues() As Variant
Dim startCell As Range
startCell = Range("A1:B2")
cellValues = startCell.Value ' 存储A1到B2范围内的值为二维数组
For i = 1 To UBound(cellValues)
    Debug.Print "Row " & i & ":"; cellValues(i, 1), " - ", cellValues(i, 2)
Next i

这段代码会打印A1到B2范围内每一行的数据。