Question

excel vba单元格变量区域怎么表示

Sub 宏1()
Dim Str As Range
i = ActiveSheet.[a65536].End(xlUp).Row
For Each Str In [B4:C & i & ] '想表达B4到C i区域单元格

Answer 1

Sub 宏1()
Dim Str As Range
i = ActiveSheet.[a65536].End(xlUp).Row
For Each 州竖Str 带迹粗In Range(cells(4,2),cells(i,3))
'蠢镇....

Answer 2

对象就是的正饥赋值，必需使用set语句 Public Sub 测试() Dim dyg As Range set dyg = Range("举缓返b2") End Sub 你完全可以不用定义为单哪没元格对象，直接赋值不就行了? Public Sub 测试() Dim dyg$'定义字符串变量 dyg = Range("b2") End Sub