Live-Forum - Die aktuellen Beiträge
Datum
Titel
08.10.2025 18:39:44
Hilfe beim VBA-Code
08.10.2025 12:36:22
Hinweis für Word auf dem MAC
08.10.2025 12:35:32
Datumsabhängige Einträge in Zellen. Bedingter Formatierung.
08.10.2025 11:44:01
Faktor Uhrzeit hinzu fügen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
408to412
408to412
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Gibt's ein "Workbook_AfterSave"

Forumthread: Gibt's ein "Workbook_AfterSave"

Gibt's ein "Workbook_AfterSave"
Florian
Hallo!
Das Workbook_BeforeSave hat mir schon viele gute Dienste geleistet.
Jetzt möchte ich gerne eine Prozedur starten, direkt nachdem die Datei gespeichert worden ist.
Was kann ich tun?
Danke und Gruß aus Berlin
Florian
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Gibt's ein "Workbook_AfterSave"
Ramses
Hallo
Das gibt es leider nicht.
Workaround, ... sollte tun denke ich ;-)
Option Explicit

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
'Dein Code
ThisWorkbook.Save
ThisWorkbook.Saved = True
'Dein anderer Code
End Sub

Nachdem das Workbook ja gespeichert werden soll, kannst du es ja auch speichern :-)
Gruss Rainer
Anzeige
Es gibt ein "Workbook_AfterSave"
Florian
Hallo, Rainer,
danke für den Tipp. Hab's mit 'nem Code von Hans noch etwas verfeinert:
Danke und Gruß,
Florian

Option Explicit
Dim bln As Boolean

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Application.DisplayAlerts = False
If bln = False Then
Cancel = True
bln = True
ThisWorkbook.Save
Range("A1") = "Dieser Text erscheint NACH dem Speichern."
ThisWorkbook.Saved = True
End If
Application.DisplayAlerts = True
End Sub

Anzeige
Merci :-) Geschlossen o.T.
Ramses
...
AW: Gibt's ein "Workbook_AfterSave"
08.04.2004 16:01:27
Florian
Da hat noch 'was gefehlt, sonst wird die Routine nämlich nur beim ersten Speichern ausgeührt. Die Variable bln muß danach wieder auf False gesetzt werden.

Option Explicit
Dim bln As Boolean

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Application.DisplayAlerts = False
If bln = False Then
Cancel = True
bln = True
ThisWorkbook.Save
Range("A1") = "Dieser Text erscheint NACH dem Speichern."
ThisWorkbook.Saved = True
bln = False
End If
Application.DisplayAlerts = True
End Sub

Anzeige
;

Forumthreads zu verwandten Themen

Wie erreiche ich das Ereignis "Workbook_AfterSave"
Larsinator

Tach alle,
ich möchte - nachdem die aktuelle Datei gespeichert wurde, eine Sicherungskopie von ihr erstellen.
Jetzt gibt es ja die Ereignisse "BeforeClose" & "BeforeSave", aber in beiden Fällen ist ja noch nicht gespeichert, wenn ich da rein laufe.
Hat vielleicht jemand eine Ide...
01.10.2008 11:44:19
Thread-ID: 1013570
4 Beiträge
Anzeige
Save Historie via Privat Sub Workbook Aftersave
Denis

Hallo, ich benötige mal eure Hilfe.
in meiner Arbeitsmappe habe ich zwei Tabellen "Template" und "Save History"
Ich möchte mit diesem Code das wann immmer das Template gespeichert wird der User und die aktuelle Zeit im Template in einem definierten Feld und im Reiter Save Histroy eine L...
27.04.2015 11:06:19
Thread-ID: 1423252
6 Beiträge
Save Historie via Privat Sub Workbook Aftersave
Denis

Hallo, ich benötige mal eure Hilfe.
in meiner Arbeitsmappe habe ich zwei Tabellen "Template" und "Save History"
Ich möchte mit diesem Code das wann immmer das Template gespeichert wird der User und die aktuelle Zeit im Template in einem definierten Feld und im Reiter Save Histroy eine L...
27.04.2015 13:22:15
Thread-ID: 1423300
2 Beiträge
Workbook AfterSave Excel 2003
Anna

Guten Tag
Ich habe eine frage.
Ich habe ein "Workbook_AfterSave" Code zum Excel Datei Sichern.
Leider funktioniert dieser Code nicht unter Excel 2003
Kann es sein das dieser Code bei Excel 2003 gar nicht geht?
Kennt sich jemand mit Excel 2003 gut aus damit der Code auch da...
01.05.2020 15:10:48
Thread-ID: 1756132
12 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige