Excel单元格引用、区域的引用，在VBA编程中，有着重要的意义。掌握单元格、区域的引用方法，可方便我们对数据进行相应的处理。下面，是单元格、区域的引用方法之总结，希望对您有帮助。
接上篇…
⑦相对于其他单元格来引用单元格
处理相对于另一个单元格的某一单元格的常用方法是使用 Offset 属性。下例中，将位于活动工作表上活动单元格下一行和右边三列的单元格的内容设置为双下划线格式。
ActiveCell.Offset(1, 3).Font.Underline = xlDouble
注意 可录制使用 Offset 属性（而不是绝对引用）的宏。在“工具”菜单上，指向“宏”，再单击“录制新宏”，然后单击“确定”，再单击录制宏工具栏上的“相对引用”按钮。
若要在单元格区域中循环，请在循环中将变量与 Cells 属性一起使用。下例以 5 为步长，用 5 到 100 之间的值填充第三列的前 20 个单元格。变量 counter 用作 Cells 属性的行号。
Dim counter As Integer
For counter = 1 To 20
Worksheets("Sheet1").Cells(counter, 3).Value = counter * 5
Next counter
⑧用Range对象引用单元格
如果将对象变量设置为 Range 对象，即可用变量名方便地操作单元格区域。
下述过程创建了对象变量 myRange，然后将活动工作簿中 Sheet1 上的单元格区域 A1:D5 赋予该变量。随后的语句用该变量代替该区域对象，以修改该区域的属性。
Dim myRange As Range
Set myRange = Worksheets("Sheet1").Range("A1:D5")
myRange.Formula = "=RAND()"
myRange.Font.Bold = True
⑨引用工作表上的所有单元格
如果对工作表应用 Cells 属性时不指定编号，该属性将返回代表工作表上所有单元格的 Range 对象。下述 Sub 过程清除活动工作簿中 Sheet1 上的所有单元格的内容。
Worksheets("Sheet1").Cells.ClearContents
⑩引用多个单元格区域
使用适当的方法可以很容易地同时引用多个单元格区域。可用 Range 和 Union 方法引用任意组合的单元格区域；用 Areas 属性可引用工作表上选定的一组单元格区域。
使用 Range 属性
通过在两个或多个引用之间放置逗号，可使用 Range 属性来引用多个单元格区域。下例清除了 Sheet1 上三个单元格区域的内容。
Worksheets("Sheet1").Range("C5:D9,G9:H16,B14:D18"). _
ClearContents
命名区域使得用 Range 属性处理多个单元格区域更为容易。下例可在三个命名区域处于同一工作表时运行。
Range("MyRange, YourRange, HisRange").ClearContents
使用 Union 方法
用 Union 方法可将多个单元格区域组合到一个 Range 对象中。下例创建了名为 myMultipleRange 的 Range 对象，并将其定义为单元格区域 A1:B2 和 C3:D4 的组合，然后将该组合区域的字体设置为加粗。
Dim r1, r2, myMultipleRange As Range
Set r1 = Sheets("Sheet1").Range("A1:B2")
Set r2 = Sheets("Sheet1").Range("C3:D4")
Set myMultipleRange = Union(r1, r2)
myMultipleRange.Font.Bold = True
使用 Areas 属性
可用 Areas 属性引用选定的单元格区域或多块选定区域中的区域集合。下述过程计算选定区域中的块数目，如果有多个块，就显示一则警告消息。
If Selection.Areas.Count > 1 Then
MsgBox "Cannot do this to a multiple selection."
End If