So fügen Sie automatische Ereignisprotokolle mithilfe des Excel-VBA-Zeitstempels ein

Zeitstempel sind eine großartige Ressource, um zu identifizieren, wann ein Ereignis aufgetreten ist. Microsoft Excel bietet Ihnen die Möglichkeit, Zeitstempel im Format dd:mm:yyyy hh:mm:ss hinzuzufügen. Meistens müssen Sie Tastaturkürzel verwenden oder Excel-Funktionen ausführen, um die Zeitstempel hinzuzufügen, was eine manuelle und fehleranfällige Aufgabe ist.

Der Excel-Visual-Basic-Code-Editor kommt Ihnen zu Hilfe, indem er Ihnen ermöglicht, die gesamte Aufgabe mithilfe der VBA-Zeitstempel-Skripte zu automatisieren. Sie können auch komplexe Bedingungen hinzufügen, um die Aufgabe weiter zu automatisieren, ohne auf den Dateneingabeoperator oder Mitarbeiter angewiesen zu sein. Lesen Sie weiter, um ein paar einfache Tricks zu lernen, wie Sie mit VBA Zeitstempel in Excel hinzufügen können.

1. So fügen Sie einen VBA-Zeitstempel hinzu: QAT-Makro

Mit dem folgenden VBA-Code können Sie die Ereignisprotokollfunktion jederzeit mit einem einzigen Klick über die Excel-Schnellzugriffsleiste oder QAT ausführen. Es ähnelt der Ausführung eines Excel-VBA- Makros, daher müssen Sie das vorhandene Arbeitsblatt mit einer Makro -fähigen Dateierweiterung speichern, nachdem Sie den VBA-Code angewendet haben:

• Klicken Sie mit der rechten Maustaste auf die Arbeitsblattregisterkarte und klicken Sie im Kontextmenü auf Code anzeigen .
• Kopieren Sie diesen VBA-Code, fügen Sie ihn in den Code-Editor ein und klicken Sie dann auf Speichern .

Sub vba_timeStamp() Dim ts As Date With Selection .Value = Date + Time End With End Sub

• Speichern Sie die Arbeitsmappe als makrofähige Datei.
• Klicken Sie nun auf die Registerkarte „Datei“ und wählen Sie „Optionen“ aus dem Menü „Datei“.
• Klicken Sie auf die Symbolleiste für den Schnellzugriff (QAT) und scrollen Sie dann durch die Liste, um „ Makros anzeigen“ zu finden .
• Fügen Sie Ansichtsmakros zum QAT hinzu und schließen Sie das Menü „Optionen“ , indem Sie auf „OK“ klicken .
• Führen Sie nun das Makro vom QAT aus, wenn Sie einen Zeitstempel hinzufügen müssen, indem Sie den VBA-Code ausführen.

Um die Zeitstempelerstellung vollständig zu automatisieren, können Sie die unten aufgeführten VBA-Skripte verwenden.

2. So fügen Sie einen VBA-Zeitstempel hinzu: Wenn sich das Arbeitsblatt ändert

Der folgende VBA-Code fügt einen Zeitstempel in den Zellen von Spalte B hinzu , wenn er Änderungen in den entsprechenden Zellen von Spalte A erkennt :

Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Column = 1 And Target.Value <> "" Then Application.EnableEvents = False Target.Offset(0, 1) = Format(Now(), "dd-mm-yyyy hh:mm:ss") Application.EnableEvents = True End If End Sub

Befolgen Sie die in der ersten Methode genannten Schritte, um den VBA-Code-Editor zu öffnen. Doppelklicken Sie nun im Menü „VBAProject (Book1)“ auf „Blatt1“ (Blatt1), um die Nachverfolgung von Arbeitsblattänderungen zu aktivieren.

Der Code-Editor sollte im Dropdown-Menü auf der linken Seite „ Worksheet “ und im Dropdown-Menü auf der rechten Seite „ SelectionChange“ anzeigen . Sie können jetzt den obigen VBA-Code kopieren und einfügen. Wenn Sie fertig sind, vergessen Sie nicht, die Datei als makrofähige Excel-Arbeitsmappe zu speichern.

Immer wenn Sie dieses Makro ausführen, fügt Excel automatisch einen Zeitstempel in Spalte B hinzu , wenn Sie etwas in Spalte A schreiben . Sie können das Makro auch zu QAT hinzufügen, indem Sie die in der vorherigen Methode zum Hinzufügen des VBA-Skripts genannten Schritte ausführen.

Letzte Worte

Nachdem Sie nun wissen, wie Sie den Excel-VBA-Code-Editor mit den oben genannten VBA-Zeitstempelcodes verwenden, können Sie damit beginnen, Ihre Excel-Arbeitsmappe so zu ändern, dass Zeitstempel bei Bedarf automatisch eingefügt werden.

Allerdings werden alle Änderungen, die Sie in Ihrem Excel-Arbeitsblatt durch Ausführen eines VBA-Codes vornehmen, nicht gelöscht, wenn Sie den Hotkey „Rückgängig“ drücken. Erstellen Sie daher Sicherungskopien, bevor Sie diese einfachen VBA-Skripte anwenden. Excel VBA kann auch andere coole Funktionen ausführen, zum Beispiel können Sie VBA verwenden, um Zeilen in Microsoft Excel einzufügen.