excel - VBA 代码仅在 Debug模式下工作，在正常模式下运行时挂起

Question

这个问题快把我逼疯了。我有以下代码:

'unprotect sheet
If.Range("Start").Row+1<.Range("End").Row then
  .Rows(.Range("Start").Row+1 & ":" & .Range("End").Row-1).Select
  Selection.Delete Shift:=xlUp
  'protect sheet
End if

当我在 Debug模式下运行它并跟踪代码时，它工作得很好。但是，当以正常模式(而不是调试)运行代码时，它会给我一条错误消息:“Range 类的选择方法失败”。此错误发生在以下行中: .Rows(.Range("Start").Row +1 ....就在 IF 语句之后。有任何想法吗？请帮忙。

Answer 1

此错误通常意味着您正在尝试选择属于非事件工作表的范围。

你几乎总是don't need to select anything :

.Rows(.Range("Start").Row+1 & ":" & .Range("End").Row-1).Delete Shift:=xlUp