Thema Datum  Von Nutzer Rating
Antwort
03.05.2021 14:45:52 Semi
NotSolved
03.05.2021 14:58:36 Werner
Solved
18.05.2021 15:41:57 Gast28831
NotSolved
18.05.2021 17:07:56 Gast70009
NotSolved
24.05.2021 13:51:25 Werner
NotSolved
18.05.2021 20:23:45 ralf_b
NotSolved
Rot Bearbeitungsdatum VBA Makro
24.05.2021 15:48:44 David
NotSolved

Ansicht des Beitrags:
Von:
David
Datum:
24.05.2021 15:48:44
Views:
252
Rating: Antwort:
  Ja
Thema:
Bearbeitungsdatum VBA Makro

Hallo Semi, das müsstest Du in DieseArbeitsmappe kopieren. Es zeigt dann das aktuelle Datum mit Uhzeit an. Das zweite Makro zeigt opitional an, wenn das Speichern nicht funktionieren würde und wann die Datei erstellt wurde. Gruß David

 

Option Explicit

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)

    ActiveSheet.Range("C4") = Format(Now, "DD.MM.YYYY, HH:MM") & " Uhr"
    
End Sub

Private Sub Workbook_AfterSave(ByVal Success As Boolean)

    If Not Success Then ActiveSheet.Range("BH2") = "Nicht gespeichert"
    ActiveSheet.Range("BI2") = "Erstellt: " & Format(DieseArbeitsmappe.BuiltinDocumentProperties.Item("Creation Date"), "DD.MM.YYYY")
    
End Sub


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
03.05.2021 14:45:52 Semi
NotSolved
03.05.2021 14:58:36 Werner
Solved
18.05.2021 15:41:57 Gast28831
NotSolved
18.05.2021 17:07:56 Gast70009
NotSolved
24.05.2021 13:51:25 Werner
NotSolved
18.05.2021 20:23:45 ralf_b
NotSolved
Rot Bearbeitungsdatum VBA Makro
24.05.2021 15:48:44 David
NotSolved