Excel VBAオートメーションエラー2回目のコード実行

Question

VBA Excelで2回目にオートメーションエラーが発生しました。

Sheets("Panel Resumen").Select 
Rows("55:69").Select 
Selection.Copy 
Rows("55:55").Select 
Selection.Insert Shift:=xlDown 
Range("D25").Select 
Application.CutCopyMode = False 

そして、それは私が研究し、このリンクhttps://support.microsoft.com/en-us/help/178510/excel-automation-fails-second-time-code-runs になったが、私は、私は失敗していたオブジェクトである得ることはありません

Selection.Insert Shift:=xlDown 

行でエラーをトリガ： 次のようにそれはありますSelectを使用しない

Answer 1

を呼び出すために、これはそれを解決すべきだと思う：

With Sheets("Panel Resumen") 
    .Rows("55:69").Copy 
    .Rows("55:55").Insert Shift:=xlDown 
End With 
Application.CutCopyMode = False