Excel单元格的相关操作
工具/原料
Excel 2013
选取特定单元格
1、Sub 选取已使用单元格()ActiveSheet.UsedRange.SelectEnd Sub
2、执行代码,效果如下图所示:
选取或指定单元格相邻的区域
1、Sub选取或指定单元格相邻的区域()Range("a1").CurrentRegion.SelectEnd Sub
2、执行结果如下图所示:
选取区域端点单元格
1、选取单元格的方法,如下图所示:
2、Sub 选取端点单元格()'B列第一个非空单元格 If Range("b1") = "" Then Range("b1").End(xlDown).Select Else Range("b1").Select End IfEnd Sub
3、Sub 选取端点单元格()'B列最后一个非空单元格Range("b" & Rows.Count).End(xlUp).SelectEnd Sub
4、Sub 选取端点单元格()Dim x As Integerx = Range("b" & Rows.Count).End(xlUp).Row + 1Range("b" & x).SelectEnd Sub
5、Sub 选取端点单元格()'第二行第一个非空单元格 If Ra艘绒庳焰nge("A2") = "稆糨孝汶;" Then Range("A2").End(xlToRight).Select Else Range("A2").Select End IfEnd Sub
6、Sub 选取端点单元格()'第二行最后一个非空单元格 Cells(2, Columns.Count).End(xlToLeft).SelectEnd Sub