VBA Range 函数如何使用

VBA (Visual Basic for Applications) 中的 `Range` 函数是一个非常强大的工具，它用于Excel工作表中特定单元格、区域或一组连续单元格的操作。以下是 `Range` 函数的基本使用方法：

1. **指定单个单元格**：

   Dim rng As Range
   Set rng = ThisWorkbook.Worksheets("Sheet1").Range("A1") ' 设置A1单元格为范围对象

2. **指定区域**：

   Set rng = ThisWorkbook.Worksheets("Sheet1").Range("A1:C5") ' 包含从A1到C5的所有单元格

3. **通过地址引用**：

   Set rng = Range("B2:E4") ' 直接使用相对或绝对地址

4. **基于条件选择单元格**：

   Set rng = Range("A1:A10").SpecialCells(xlCellTypeVisible) ' 获取可见单元格

5. **操作范围内的内容**：
- 修改值：`rng.Value = "New Value"` 或 `rng(1, 1) = 123`
- 计算：`Total = rng.Sum()` 或 `MaxValue = rng.Max()`

6. **复制、移动或删除范围**：

   rng.Copy Destination:=AnotherSheet.Range("D1") ' 将A1到C5复制到另一个工作表的D1
   rng.Delete Shift:=xlUp ' 删除当前选区的上一行