在Excel 2010中使用范围

在Excel 2010中使用范围是编写VBA宏时非常常见的技术。范围指的是一组单元格，可以是一个单独的单元格，一个行或列，一个特定的矩形区域，或整个工作表。使用范围可以让编写的宏更具通用性和可重复性。

使用方法

在VBA中，可以使用Range对象表示一个单元格或一组单元格的范围。可以使用以下方法创建一个Range对象：

Dim rng As Range
Set rng = Range("A1")

以上代码创建了一个范围对象rng，表示单元格A1。可以将单元格的地址字符串作为参数传递给Range函数来创建范围对象。例如：

Set rng = Range("A1:B10")  ' 表示A1到B10的矩形区域
Set rng = Range("A:B")     ' 表示整个列A
Set rng = Range("1:10")    ' 表示整个行1

还可以使用行列索引来引用特定单元格或单元格范围。

Set rng = Cells(1, 1)      ' 等同于Range("A1")
Set rng = Range(Cells(1, 1), Cells(10, 2)) ' 等同于Range("A1:B10")

在使用范围时，还可以将范围视为一个集合。可以使用For Each语句对范围进行迭代，例如：

For Each cell In Range("A1:B10")
    ' 对每个单元格执行某些操作
Next cell

常见用途

使用范围可以实现很多功能，以下是一些例子：

• 在单元格范围内进行计算

  Set rng = Range("A1:C3")
  sum = WorksheetFunction.Sum(rng)
  

• 对范围内的单元格进行格式化

  Set rng = Range("A1:B10")
  rng.Font.Bold = True
  rng.Interior.ColorIndex = 6
  

• 处理范围内的单元格内容

  Set rng = Range("A1:B10")
  For Each c In rng
      c.Value = UCase(c.Value)
  Next c
  

• 操作整个列或行

  ' 删除整个列A
  Columns("A").Delete
  ' 将整个行1复制到行11
  Rows("1:1").Copy Rows("11:11")
  

总结

使用Excel中的范围可以帮助程序员更轻松地处理工作表中的单元格。通过使用范围对象，可以区分单个单元格和矩形范围。此外，宏可以使用Range引用创建代码的动态、可调的组件，使宏更加灵活和通用。