Question

我有一个奇怪的问题：像

这样的行

rows("1:1000000").delete

和

rows("1:1000000").clearcontents

停止执行并退出潜艇没有错误消息，错误处理没有得到任何错误编号在调试模式下，线路被执行然后全部，接下来的事情就是没有宏运行，就像线路意味着＃34; end sub＆＃34;。
我用Google搜索，什么也没找到。
在其他计算机上尝试这个宏都得到了相同的结果没有受保护的单元格，没有电子表格和工作簿事件最终我删除了文件中的所有模块以及同一模块中的所有子模块并且代码运行完毕。然后关闭文件而不保存，重新打开它，一切正常我的猜测是Excel中的某些东西在某些地方恢复正常知道它可能是什么？我担心问题可能会在某个时候回来。

更新：问题再次出现并在另一个文件中运行另一个宏后消失了

UPDATE2：sub的完整代码在这里：

Sub GenRep()
Application.EnableEvents = True
Sheets("rep").Activate
On Error Resume Next
Rows("3:1000000").Delete 'this line breaks execution, no further lines are executed, no error code nor warning messages
If Err.Number <> 0 Then Debug.Print "Err: " & Err.Number
NLines% = Sheets("db").Range("a1000000").End(xlUp).Row
Rows("2:" & NLines).FillDown
End Sub

我评论了打破执行的行

Answer 1

尝试：

Sheet1.Range(Rows(1), Rows(1000000)).EntireRow.Delete
Sheet1.Range(Rows(1), Rows(1000000)).ClearContents

Excel .delete＆amp; .clearcontents stop sub

1 个答案: