目录
单元格的引用方法 (2)
选定单元格区域的方法 (9)
获得指定行、列中的最后一个非空单元格 (12)
定位单元格 (14)
查单元格 (16)
替换单元格内字符串 (22)
复制单元格区域 (23)
仅复制数值到另一区域 (27)
单元格自动进入编辑状态 (28)
禁用单元格拖放功能 (29)
单元格格式操作 (30)
单元格中的数据有效性 (37)
单元格中的公式 (43)
单元格中的批注 (49)
合并单元格操作 (51)
高亮显示单元格区域 (58)
双击被保护单元格时不显示提示消息框 (60)
重新计算工作表指定区域 (62)
输入数据后单元格自动保护 (63)
工作表事件Target参数的使用方法 (64)
单元格的引用方法
在VBA中经常需要引用单元格或单元格区域区域，主要有以下几种方法。
1、使用Range属性
VBA中可以使用Range属性返回单元格或单元格区域，如下面的代码所示。
1.Sub RngSelect()
2.    Sheet1.Range("A3:F6, B1:C5").Select
3.End Sub
复制代码
代码解析：
RngSelect过程使用Select方法选中A3:F6，B1:C5单元格区域。
Range属性返回一个Range对象，该对象代表一个单元格或单元格区域，语法如下：
1.Range(Cell1, Cell2)
复制代码
参数Cell1是必需的，必须为A1 样式引用的宏语言，可包括区域操作符（冒号）、相交区域操作符（空格）或合并区域操作符（逗号）。也可包括美元符号（即绝对地址，如“$A$1”）。可在区域中任一部分使用局部定义名称，如Range("B2:LastCell")，其中LastCell为已定义的单元格区域名称。
参数Cell2是可选的，区域左上角和右下角的单元格。
r  b e i n g  a r e  g s o 运行Sub RngSelect 过程，选中A3:F6, B1:C5单元格区域，如图 1 所示。
图 1 使用Range 属性引用单元格区域
注意 如果没有使用对象识别符，Range 属性返回活动表的一个区域，如果活动表不是工作表，则该属性无效。2、使用Cells 属性
使用Cells 属性返回一个Range 对象，如下面的代码所示。
1.Sub Cell()
2.    Dim icell As Integer
excel最强教科书完全版pdf
3.    For icell = 1 To 100
4.        Sheet2.Cells(icell, 1).Value = icell
5.    Next
6.End Sub
复制代码
代码解析：
Cell 过程使用Next 语句为工作表中的A1:A100单元格区域填入序号。
Cells 属性指定单元格区域中的单元格，语法如下：
1.Cells(RowIndex, ColumnIndex)
复制代码
参数RowIndex是可选的，表示引用区域中的行序号。
参数ColumnIndex是可选的，表示引用区域中的列序号。
如果缺省参数，Cells属性返回引用对象的所有单元格。
Cells属性的参数可以使用变量，因此经常应用于在单元格区域中循环。
3、使用快捷记号
在VBA中可以将A1引用样式或命名区域名称使用方括号括起来，作为Range属性的快捷方式，这样就不必键入单词“Range”或使用引号，如下面的代码所示。
1.Sub Fastmark()
2.    [A1：A5] = 2
3.    [Fast] = 4
4.End Sub
复制代码
代码解析：
Fastmark过程使用快捷记号为单元格区域赋值。
第2行代码使用快捷记号将活动工作表中的A1：A5单元格赋值为2。
第3行代码将工作簿中已命名为“Fast”的单元格区域赋值为4。
注意使用快捷记号引用单元格区域时只能使用固定字符串而不能使用变量。
4、使用Offset属性
可以使用Range对象的Offset属性返回一个基于引用的Range对象的单元格区域，如下面的代码所示。
1.Sub Offset()
r  s o 2.    Sheet3.Range("A1:C3").Offset(3, 3).Select 3.End Sub
复制代码
代码解析：
Offset 过程使用Range 对象的Offset 属性选中A1：A3单元格偏移三行三列后的区域。应用于Range 对象的Offset 属性的语法如下：expression.Offset(RowOffset, ColumnOffset)
参数expression 是必需的，该表达式返回一个Range 对象。
参数RowOffset 是可选的，区域偏移的行数（正值、负值或 0（零））。正值表示向下偏移，负值表示向上偏移，默认值为 0。
参数ColumnOffset 是可选的，区域偏移的列数（正值、负值或 0（零））。正值表示向右
偏移，负值表示向左偏移，默认值为 0。
运行Offset 过程，选中A1：A3单元格偏称三行三列后的区域，如图2所示。
图2 使用Range 对象的Offset 属性
5、使用Resize 属性
使用Range 对象的Resize 属性调整指定区域的大小，并返回调整大小后的单元格区域，如
下面的代码所示。
1.Sub Resize()
2.    Sheet4.Range("A1").Resize(3, 3).Select

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。