用Excel使用VBA时显示运行错误5，错误调用参数，程序特别简单，如图，求问哪里出错了

Question

如题所述

Answer 1

第一句改成：

Sheets(2).Rows("1:100").ClearContents

i=i+1 这句放在If语句内了，如果有一行不是81，那么i 的值就不会增加，会无限循环。

代码改成如下图：

Answer 2

建议按F8一行一行的运行，找到报错的那一行，再来一次，执行报错行之前看看报错的时候各变量的数值，这样一般就能明白原因。

Answer 3

设置断点看错误在哪儿。估计是没有2号工作表而是其他表。

Answer 4

CELLS("1:1000") ??? 哪个师傅教的？
如果想清除1到1000行用 rows("1:1000")