Bereich kopieren und in neue Arbeitsmappe einfügen
Das sollte eigentlich ganz einfach sein, aber ich habe stundenlang Foren und SO-Antworten durchsucht, um die Antwort ohne Glück zu finden, also stelle ich (widerwillig) eine eigene Frage.
Ich versuche lediglich, eine neue Arbeitsmappe zu erstellen und einen Bereich aus einer anderen Arbeitsmappe in diese Arbeitsmappe einzufügen. Hört sich einfach an ..?
Meine ursprüngliche Arbeitsmappe, nennen wir Book1. Ich versuche, eine neue Arbeitsmappe, Book2, zu erstellen, die ich kopieren werdeWerte von Zellen A1: B10 bis.
Hier ist eine Version meines Codes (beginnend mit Book1 open):
Range("A1:B10").Copy
Set NewBook = Workbooks.Add
With NewBook
.SaveAs Filename:="Book2.xls"
End With
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Dies führt zu dem Fehler "PasteSpecial of Range class failed". Ich habe die folgenden Korrekturen ohne Glück versucht:
'Arbeitsmappen ("Book2.xls"). Aktivieren' zum Code hinzugefügtDie zusätzlichen Argumente in der PasteSpecial-Zeile wurden entferntversuchte '.Paste' anstelle von '.PasteSpecial''Selection.PasteSpecial' wurde in 'ActiveSheet.PasteSpecial' geändertexplizite Bezugnahme auf den Kopierbereich, einschließlich der Arbeitsmappen- und BlattreferenzErstellen Sie zuerst die neue Arbeitsmappe und führen Sie dann die Kopie durch, bevor Sie die neue Arbeitsmappe reaktivieren und einfügenKeine der oben genannten Lösungen funktioniert ... zum jetzigen Zeitpunkt wäre jede Weisheit dankbar!