单元格区域的表示简单的写法VBA

nnsea

'除了前面讲的range\cells单元格区域的表示方法还，还是一种简单的写法
'写法: [单元格地址] '注意：中括号中的单元格地址并不需要双引号("")
Sub 单元格简写()
[a3].Select ' 单元格引用
[b2:c6].Select '单元格区域引用
[a3,b2:c6,b8:d12].Select '多区域引用
[a:a].Select '整列引用
[1:1].Select '整行引用
End Sub


'单元格简写的也支持引用子集
Sub 子集引用()
[b2:c6].Item(3).Select
Range("b2:c6")(3).Select
[b2:c6].Cells(4).Select
End Sub



Sub 动态区域的引用()
a = Application.CountA([a:a])
b = Application.CountA([1:1])
Range(Range("a1"), Range(Chr(64 + b) & a)).Select '利用chr函数，让字母形式的列号也支持变量
End Sub



Sub chr函数字符循环()
For i = 1 To 65535
Cells(i, 1) = i
Cells(i, 2) = Chr(i)
Next
End Sub

nnsea

功能	Range	Cells	[单元格地址]
引用对象	单元格，区域，行，列	单元格	单元格，区域，行，列
变量支持	支持	支持	不支持
书写难易	难	难	易

nnsea

Sub range引用区域且有变量()
Dim i
i = 1
Range("a1:c" & i).Select '引用单元格是区域且有变量
Cells(i, "c").Select '引用的是单个单元格且有变量
[a1:19].Select '引用的是区域或单元格且无变量
End Sub