Blätter kopieren und als neues Dokument öffnen.
25.08.2003 13:32:09
SeKo
Ich hoffe, ihr hattet ein gutes Wochenende und seid wieder fit für die nächste Woche :-).
Ich quäle mich immer noch mit dem Problem, dass ich 2 bestimmte Blätter kopieren und als neues Dokument speichern möchte.
Speichern werde ich diese manuell, daher ist nur die "Auswahl-" und die "Kopierfunktion" nötig.
Folgendes habe ich ausprobiert:
-------------------------------------------------------------------------------
Sub copy_crop()
' copy_crop Makro
' Tastenkombination: Strg+Umschalt+C
Sheets(Array("26.DI", "Städte")).Select
Sheets("Städte").Activate
Sheets(Array("26.DI", "Städte")).Copy
End Sub
-------------------------------------------------------------------------------
So kopiert er immer beim Aufruf des Makros die bestimmten Blätter, also das "26.DI" und "Städte". Dabei soll eben "DAS AKTUELLE" Blatt + das Blatt "Städte" kopiert und in einem neuen Dokument angezeigt werden.
Was muss ich am Code ändern, damit es klappt ?
Schönen Gruß
SeKo