Registriert seit: 28.02.2016
Version(en): 2013
05.04.2016, 11:24
(Dieser Beitrag wurde zuletzt bearbeitet: 05.04.2016, 11:24 von Nixblick0815.)
Hallo!
Wie kann ich den Code als makro speichern?
Code:
Private Sub Workbook_Open()
ActiveWorkbook.SaveCopyAs Filename:= _
("C:\Dokumente und Einstellungen\irgendwas\Eigene Dateien\Sicherung\" & "Sicherung " & Format(Now, "dd-MM-yyyy_HH-MM") & ".xls")
End Sub
Ich gehe auf
Makro aufzeichen dann
beenden, nun wird er angezeigt. dann drücke ich beabeiten und gebe die Zeilen ein.
Arbeitsblatt speichern und wieder öffnen dann ist das makro weg.
Im Visual Basic Editor ist er aber noch da.
Was mache ich falsch?
Registriert seit: 12.10.2014
Version(en): 365 Insider (32 Bit)
Halllo!
Ein Workbook_Open gehört ins Klassenmodul DieseArbeitsmappe
Klicke doppelt darauf und kopiere.
Allerdings würde ich .xlsm als Dateiendung nehmen.
Gruß Ralf
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag.
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
Registriert seit: 10.04.2014
Version(en): 2016 + 365
05.04.2016, 12:45
(Dieser Beitrag wurde zuletzt bearbeitet: 05.04.2016, 20:58 von Rabe.)
Hi,
(05.04.2016, 11:24)Nixblick0815 schrieb: Arbeitsblatt speichern und wieder öffnen dann ist das makro weg.
Im Visual Basic Editor ist er aber noch da.
das ist ein Widerspruch in sich:
entweder es ist weg, dann ist es genau im Editor weg
oder
es ist im Editor da, dann ist es eben auch noch da!
Was jetzt?
Registriert seit: 11.04.2014
Version(en): '97 bis 2016; 365
05.04.2016, 15:39
(Dieser Beitrag wurde zuletzt bearbeitet: 05.04.2016, 15:46 von Rabe.
Bearbeitungsgrund: xlmb korrigiert
)
Hallo,
wo das Makro hingehört, das ist Dir ja schon verraten worden.
Interessehalber frage ich mal nach, wo das Ding jetzt steht, weil Du ja schreibst, Du hast es aufgezeichnet.
Ab xl2007 speichert man Dateien die Makros beinhalten im *.xlsm- oder im *.xlsb-Format, denn sonst
sind sie ganz plötzlich weg, die Makros.
________________________________________________________________________
wer aufgibt, ohne es versucht zu haben, gibt einfach nur auf!
Grüße aus Norderstedt, Peter
Registriert seit: 12.10.2014
Version(en): 365 Insider (32 Bit)
Hallo Peter!
Zitat:weil Du ja schreibst, Du hast es aufgezeichnet.
Mit Schwestern des Neffen! :19:
Der TE beschrieb nur einen ausgesprochen unorthodoxen Weg, in den VBA-Editor zu gelangen.
Quasi eine sofort abgebrochene Aufzeichnung.
(Alt+F11 wäre einfacher gewesen)
Gruß Ralf
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag.
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
Registriert seit: 10.04.2014
Version(en): 2016 + 365
Hi Ralf,
(05.04.2016, 16:20)RPP63 schrieb: Der TE beschrieb nur einen ausgesprochen unorthodoxen Weg, in den VBA-Editor zu gelangen.
Quasi eine sofort abgebrochene Aufzeichnung.
und in Erweiterung schrieb er:
Zitat:und gebe die Zeilen ein.
also ist
schon ein Makro vorhanden.
Registriert seit: 12.10.2014
Version(en): 365 Insider (32 Bit)
Hi Ralf!
Zunächst mal ist ja nur plain text irgendwo im Editor vorhanden.
Nix Makro.
Gruß Ralf
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag.
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)
Registriert seit: 11.04.2014
Version(en): '97 bis 2016; 365
Hallöchen ihr Ralf's,
ich habe mir den Eingangsthread nun noch ein paarmal durchgelesen und ...
ich würde es wirklich gerne vorgeführt bekommen, was da wie gelaufen ist.
Es muß absolut göttlich gewesen sein.
Da ich demnächst mal wieder ein Weilchen in einem Krankenhaus sein darf
werde ich meine freien Kapazitäten dafür nutzen, für unsere ForenAbteilung
"VBA ... von ganz, ganz vorne" grundlegende Aufsätzchen zu schreiben.
Dann ist sie wenigstens halbwegs brauchbar genutzt, die öde Wartezeit
zwischen den einzelnen Anwendungen und Untersuchungen.
________________________________________________________________________
wer aufgibt, ohne es versucht zu haben, gibt einfach nur auf!
Grüße aus Norderstedt, Peter
Registriert seit: 10.04.2014
Version(en): 97-2019 (32) + 365 (64)
Hallöchen,
Der TE hat vielleicht eine Schaltfläche oder ein anderes Formularsteuerelement eingefügt. Wenn man mit dem entsprechenden Dialog oder auch unabhängig davon über die Entwicklertools das Makro aufzeichnet wird dann im Dialog auch etwas angezeigt, zwar nicht der Code, aber der Name des Makros.
Wenn nun der Name des Makros in "Private..." geändert wird, dann ist es im VBA-Editor noch da, wird aber im Dialog nicht mehr angezeigt
- ist also dort weg ...
. \\\|/// Hoffe, geholfen zu haben.
( ô ô ) Grüße, André aus G in T
ooO-(_)-Ooo (Excel 97-2019+365)
Registriert seit: 12.10.2014
Version(en): 365 Insider (32 Bit)
Moin!
Frisch ausgeruht kann man die Frage des TE natürlich auch anders verstehen:
Zitat:Wie kann ich den (folgenden) Code als makro speichern?
@nixblick:
Was Du da vorliegen hast, nennt sich Ereignismakro, gehört ins Modul DieseArbeitsmappe und startet automatisch beim Öffnen der Datei.
Wenn Du es als ausführbares Makro haben willst, es also per Schaltfläche oder per Alt+F8 jederzeit ausführen willst, gehst Du so vor:
Öffne den VBA-Editor per Alt+F11
Erzeuge ein allgemeines Modul mittels Einfügen, Modul
Gib dem Makro einen beliebigen Namen (ohne Private)
Code:
Sub Mein_Makro()
ActiveWorkbook.SaveCopyAs Filename:= _
"C:\Dokumente und Einstellungen\irgendwas\Eigene Dateien\Sicherung\" & "Sicherung " & Format(Now, "dd-MM-yyyy_hh-nn") & ".xlsm"
End Sub
Gruß Ralf
Gib einem Mann einen Fisch und du ernährst ihn für einen Tag.
Lehre einen Mann zu fischen und du ernährst ihn für sein Leben. (Konfuzius)