Question

excel vba中出错提示：方法range作用于对象失败

Sub 清空无效数据()
Dim i&
i = Sheets("模特衣架库存表").Range("a65536").End(xlUp).Row
Range("A & i:C200").Select
Selection.Clear
End Sub
我这样的语句究竟哪里错了？几乎是录制的宏，做了一点点修改啊。

Answer 1

如果是第一个range出错
i = Sheets("模特衣架库存表").Range("a65536").End(xlUp).Row
改成
i = Sheets("模特衣架库存表").Range("A65536").End(xlUp).Row
如果是第二个range出错
可能是Range("A & i:C200")不对，试试range(cells(i,1),cells(200,3))
如果还不能解决，可能是没有激活到所需工作单，第二行添一句workbooks(数据所在xls).activate

Answer 2

Sub 清空无效数据()
Dim i&
i = Sheets("模特衣架库存表").Range("a65536").End(xlUp).Row
Range("A“ & i & ”:C200").Select
Selection.Clearcontents
End Sub

Answer 3

i=worksheets("模特衣架库存表").[a65536].end(3).row
range("a") & i,"c200").clearcontents

Answer 4

你用的是Excel2003吗？如果是a65536就超出了它的范围了改为a65535