VBA编程过程中常⽤的单元格引⽤⽅式总结
诸君好，先给⼤家拜个晚年~ 祝⼤家晚年幸福！
VBA编程经常和“对象”打交道，其中最频繁的对象⼤概就是“单元格”了。（听说您还没有对象？那……我想你⼤概需要⼀份Excel，包邮988……）
今天我们就来聊⼀下单元格的各种引⽤⽅式，⽐如单个单元格、⾏列、连续和不连续的单元格区域、相连的和交叉的单元格区域等等……。
1，当前表所有的单元格
Cells.ClearContents 清空当前表所有单元格的内容
2，当前活动单元格
ActiveCell.Value = "看见星光"
活动单元格的值等于聪明可爱的看见星光。
3，单个单元格
例如A1单元格，最常⽤的⽅式有3种：
[a1]
Range("a1") 等同于 Range("a"&1)
Cells(1,1) 等同于 Cells(1,"a")，也就是说列也可以⽤字母表⽰。
三种⽅式⾥书写最简便的是[a1]，运算效率最⾼的是cells(1,1)，⾃带⽅法属性的是Range，最后，后两种⽅式⽀持使⽤变量。
4，连续单元格区域
⽐如选取A1:B10单元格区域……
[a1:b10]
Range("a1:b10") 等同于 Range("a" & 1 & ":b" & 10)
Range("a1","b10") 等同于 Range(cells(1,1),cells(10,2)
Range("a1").Resize(10,2)，意思是以[A1]为起点，向下取10⾏，向右取2列……
第⼀种⽅法输⼊最简便，但不⽀持变量。第⼆种⽅法⽀持变量，但书写⿇烦，第三种⽅法⽐较少⽤，第四种Resize常⽤，它也可搭配数组使⽤，以便将数组结果写⼊单元格区域。
5，不连续单元格区域
⽐如选取A1:A10,C1:C10,F1:F10三个单元格区域。
Range("a1:a10, c1:c10, f1:f10")
Range("a1:a10, c1:c10, f1:f10")
Union(Range("a1:a10"), Range("c1:c10"), Range("f1:f10"))
第⼀种⽅法是直接选取，缺乏⾜够的灵活性。第⼆种union是必会语句，常⽤于搭配变量进⾏单元格⾼效批量操作，例如合并单元格处理等等。
6，⾏和列
⽐如第⼀⾏
Rows(1)
Range("a1").EntireRow
Rows("1:2") 第1和2⾏
⽐如第⼀列
Columns(1)
Columns("a:a")
Range("a1").EntireColumn
7，数据相连的单元格区域
例如以A1为点，数据相连的单元格区域。
Range("a1").CurrentRegion.Select
如果⼀个表格的数据⾜够规范（字段和记录不缺失），我们通常使⽤CurrentRegion来选取整份表格的数据。
8，当前表已使⽤的单元格区域
ActiveSheet.UsedRange.Select
这⾥需要说明的是，⼀张表格，即便从未输⼊任何数据，它依然存在UsedRange，也就是默认的A1单元格。因此……使⽤UsedRange并⽆法直接判断⼀张表格是否空⽩……
以下语句清除当前表格除了第⼀⾏以外的内容，常⽤于保存标题，清除明细记录。
ActiveSheet.UsedRange.Offset(1).ClearContents
9，交叉的单元格区域
⽐如选取当前表c:d列已使⽤的单元格区域，也就是C:D列和当前表已使⽤的单元格区域交叉的部分……
resize函数vbaIntersect([c:d], ActiveSheet.UsedRange).Select
10，以某个单元格或区域偏移取值
例如已知变量K，并假定K=10
以A1单元格为起点，向下移动K⾏后的指定单元格：
[a1].Offset(K, 0).Select
注意，该语句选取A11单元格，不是A10。
Offset第⼆参数可以省略，省略意味为0，以上语句也可以简写成：
[a1].Offset(K).Select
另外，Offset参数可以为负数。
……
以A1单元格为起点，向下扩展K⾏1列后的指定单元格区域：
[a1].Resize(k, 1).Select
注意，该语句选取A1:A10单元格区域，不是A1:B10。
Resize第⼆参数也可以省略，但省略意味为1，以上语句可以简写成：
[a1].Resize(k).Select
Resize的参数不能为0（选取的单元格区域不可能是0⾏或0列）或负数。
11，特殊单元格定位
类似于基础操作中的定位功能（快捷键F5或Ctrl+G)。
⽐如定位⼀张表的错误值单元格：
Cells.SpecialCells(xlCellTypeFormulas, 16).Select
再⽐如快速删除A列单元格为空⽩的记录⾏：
Columns("A:A").SpecialCells(xlCellTypeBlanks).EntireRow.Delete
相关语句均可以通过录制宏获取，初学阶段并不需要刻意去记忆。
……
就酱紫，温暖的拥抱，安，爱你们。
VBA编程学习与实践
⼤型Excel⼯具书《 Excel 2016应⽤⼤全》荣登京东新书销量榜计算机与互联⽹类近⼀周畅销榜第⼀名！

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