Office: per VBA Kopie der aktuellen ExcelDatei erstellen

Hallo, ich hätte da mal wieder eine Frage,

und zwar hab ich in meinen Code folgenden Teil stehen um eine Kopie der aktuellen Excel-Datei zu erstellen und diese dann zu speichern.
Der Teil mit :=xlOpenXMLWorkbookMacroEnabled, kann ja auch mit :=52 abgekürzt werden, ich weiss also sicher, dass mittels dieser Aussage eine Kopie erstellt wird, die Makros unterstützt.
Leider führt aber die Kopierte Datei nicht mehr die Codes aus.
Beispielsweise habe ich Schaltflächen in meinem Dokument, bei deren Cklicken Befehle ausgeführt werden, in der Kopie funktioniert all das nicht mehr, da kommt die Fehlermeldung:

Das Makro ... kann nicht ausgeführt werden, da es nicht verfügbar ist oder alle Makros deaktiviert wurden.

Code:

Jetzt meine Frage, habt ihr eine Idee, wie ich das Problem umgehen kann, dass die Kopie genauso funktionsfähig bleibt wie die original-Datei?

Wäre super.

Vielen Dank schon mal im voraus.

LG Kathi

:)

 

Hi Kathi,

mal generell: wenn du eine Kopie erstellen und die Ausgangsmappe behalten willst, dann wäre doch eher SaveCopyAs und nicht SaveAs angebracht - oder sehe ich das falsch?

Code:

 

Hallo,

Schaltflächen schleppen neben dem Namen des Makros auch den kompletten Pfad der Excelmappe in der sie erstellt wurden mit. In der Kopie der Mappe wollen sie also das Makro der Ursprungsmappe ausführen, wenn die nicht offen ist kommt es zu der Meldung.

Lösung: Benutze an Stelle von Schaltflächen CommandButtons aus den ActiveX-Controls die funktionieren auch in der Kopie.

 

\@Beverly, vor dem Code den ich hier gezeigt habe steht noch Erstelle die Kopie usw. In diesem Zusammenhang wird diese dann wie oben gezeigt gespeichert. Meine Ausgangsdatei bleibt auf jedenfall erhalten *Smilie

@Nepumuk, ich werde es mal ausprobieren, anstelle der Schaltflächen CommandButtons zu verwenden.

Danke für die Hilfe *Smilie

 

Es klappt, danke *Smilie