Eingaben in Tabellenblatt protokollieren

Die folgende Lösung zeigt, wie Sie Eingaben in ein Tabellenblatt protokollieren können. Zum Protokollieren, müssen Sie die Werte nur auf ein eigenes Tabellenblatt schreiben, was im vorgestellten Beispiel noch nicht stattfindet. Hier werden einfach die alten und neuen Werte über eine Messagebox ausgegeben. Das übertragen in ein Protokoll-Sheet sollte damit problemlos funktionieren.

Damit die Protokollierung funktioniert, müssen Sie die folgenden Makros auf das Tabellenblatt hinterlegen, welches protokolliert bzw. überwacht werden soll.

Public InhaltAlt
 
 Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 '** Wert vor Änderung auslesen
 InhaltAlt = Target.Value
 End Sub
 


 Private Sub Worksheet_Change(ByVal Target As Range)
 '** Änderungen protokollieren
 Dim InhaltNeu
 
 '** Wert nach Änderung auslesen
 InhaltNeu = Target.Value
 
 '** Ausgabe Wert Alt und Neu
 MsgBox "Alt: " & InhaltAlt
 MsgBox "Neu: " & InhaltNeu
 
 End Sub

Partnerlinks

Relevante Artikel

Ihre Zufriedenheit ist unser Ziel, deshalb verwenden wir Cookies. Mit diesen ermöglichen wir, dass unsere Webseite zuverlässig und sicher läuft, wir die Performance im Blick behalten und Sie besser ansprechen können. Cookies werden benötigt, damit technisch alles funktioniert und Sie auch externe Inhalte lesen können. Des Weiteren sammeln wir unter anderem Daten über aufgerufene Seiten, getätigte Käufe oder geklickte Buttons, um so unser Angebot an Sie zu Verbessern. Mehr über unsere verwendeten Dienste erfahren Sie unter „Weitere Informationen“. Mit Klick auf „Akzeptieren“ erklären Sie sich mit der Verwendung dieser Dienste einverstanden. Ihre Einwilligung können Sie jederzeit mit Wirkung auf die Zukunft widerrufen oder ändern.