<em>excel</em> VBA怎样用变量表示单元格区域？-excel vba区域,exce

sub ddd()
dim j,m,n as integer
'j没有赋抄值袭
n=0
for m=i to 100
if cells(i,j)<>"" then
n=1
goto tt
endif
next
tt:
if n=0 then
执行程百序度
endif
end sub
Sub Macro1()
Dim MyRange As Range '定义zdRange型的变量
Set MyRange = Range("A1:C3") '用Set命令将对象赋值给变内量
MyRange.Copy

Cells(5, 1).Select '选中A5单元格容
ActiveSheet.Paste '粘贴
End Sub

GoodLuck!

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