第11集 单元格的选取
27、 单元格的选取
1)单个单元格选取
Sub s()
Range(“a1”).Select
Cells(1, 1).Select
Range(“A” & 1).Select
Cells(1, “A”).Select
Cells(1).Select '按照从左到右,从上到下顺序排列
[a1].Select '简化写法
End Sub
2)相邻单元格区域
Sub d() '选取单元格a1:c5
Range(“a1:c5”).Select
Range(“A1”, “C5”).Select '以A1为顶点,C5为终点的区域:a1:c5,需要加双引号
Range(Cells(1, 1), Cells(5, 3)).Select 'a1:c5,常结合变量使用
Range(“a1:a10”).Offset(0, 1).Select 'b1:b10,offset:向下偏移0行,向右偏移1列
Range(“a1”).Resize(5, 3).Select '以a1为顶点,5行3列的区域a1:c5
End Sub
2)不相邻的单元格区域
Sub d1()
Range(“a1,c1:f4,a7”).Select '不连续区域,共1对双引号
Union(Range(“a1”), Range(“c1:f4”), Range(“a7”)).Select 'union方法,至少需2个参数
End Sub
Sub dd() 'union示例
Dim rg As Range, x As Integer
For x = 2 To 10 S