Bei der Untersuchung dieses Fehlers bin ich zu dem Schluss gekommen, dass es damit zu tun hat, dass die Zwischenablage nicht wie gewünscht gelöscht wurde, was bei der Verwendung von 2003 kein Problem darstellte, sondern jetzt, da wir 2010 verwenden von jemandem, der hier nicht mehr arbeitet)

Laufzeitfehler "4605":
Diese Methode oder Eigenschaft ist nicht verfügbar, da die Zwischenablage leer oder ungültig ist.

Das ist mein Code:

Worksheets("Exec Sum").Range("B140:I186").Copy

With myDoc.Bookmarks
  .Item("b3").Range.PasteSpecial Link:=True, DataType:=wdPasteMetafilePicture, Placement:=bmark, DisplayAsIcon:=False
End With

' Clears Clipboard
Application.CutCopyMode = False

Ich habe versucht, sendkeys ("^ C") mit der Auswahl einer leeren Zelle zuerst, aber kein Glück. Gibt es eine Möglichkeit, die ich entweder nicht mit der Copy / Paste-Methode oder auf eine andere Weise zum Löschen der Zwischenablage verwenden könnte?