插入行时，调用的对象已与其客户端断开连接

Question

我一直在

  

调用的对象已与其客户端断开连接

从这条线开始

Workbooks("LastParamChanges").Sheets("LastChanges").Range("A9").EntireRow.Insert shift:=xlDown

当弹出错误消息并单击调试以转到该行时，我单击 F8 继续到下一行，弹出另一条错误消息说

  

运行时错误1004：Range类的Insert方法失败

如果有帮助，我也会将Application.DisplayAlerts和Application.EnableEvents设置为False。

Answer 1

我遇到了同样的问题。对我有用的解决方案是在.Insert语句之前添加此代码：

Dim oldValue As Variant
With Workbooks("LastParamChanges").Sheets("LastChanges")
  .Range("B1").Activate
  oldValue = .Range("B1").Value
  .Range("B1").ClearContents
  .Range("B1").Value = oldValue
End With

您似乎首先需要在插入任何行之前编辑工作表。