─nderungsdatum einzelner Zellen automatisch protokollieren

In einer Kalkulationstabelle m÷chten Sie das Datum der letzten ─nderung einiger wichtiger Zellen erfassen. Die manuelle Eingabe ist Ihnen dafⁿr aber zu umstΣndlich. Bisherige Versuche mit der Funktion ╗HEUTE()½ haben leider noch nicht zum Erfolg gefⁿhrt.

Um ─nderungen an den Zellen automatisch zu erfassen und den Zeitpunkt gleichzeitig zu protokollieren, mⁿssen Sie ein Ereignismakro verwenden. ╓ffnen Sie zunΣchst Ihre Kalkulation und fⁿhren Sie dort den Befehl ╗Extras | Makro | Visual Basic-Editor½ aus. Mit ╗Ansicht | Projektexplorer½ ÷ffnen Sie das Fenster des Projektexplorers. Dort markieren Sie in der Struktur die gewⁿnschte Tabelle und wΣhlen dann ╗Ansicht | Code½. Nun geben Sie rechts im neuen Codefenster folgende Makrozeilen ein oder Sie kopieren sie von der Heft-CD unter CHIP-Code Praxis03: 

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If (Target.Column) = 1 Then
  If Target.Row = 4 Then Cells(4, 3) = Now
  If Target.Row = 5 Then Cells(5, 3) = Now
  If Target.Row = 6 Then Cells(6, 3) = Now
End If
End Sub
Beenden Sie die Eingabe mit ╗Datei | Schlie▀en und zurⁿck zu Microsoft Excel½. Dieses Ereignismakro ist dem einzelnen Tabellenblatt zugeordnet. Sobald sich der Wert einer beliebigen Zelle dieser Tabelle Σndert, wird das Makro automatisch ausgefⁿhrt. Die Variable ╗Target½ enthΣlt die Information ⁿber die geΣnderte Zelle. Innerhalb des Makros prⁿfen Sie nun mit ╗Bedingungen½ , ob eine zu ⁿberwachende Zelle das Makro ausgel÷st hat. In diesem Fall weisen Sie einer zugeh÷rigen Protokollzelle mit der Funktion ╗Now½ das aktuelle Datum einschlie▀lich der Uhrzeit zu.
Das Beispielmakro erwartet die Zellen in der ersten Spalte und prⁿft die Zeilen ╗4½ bis ╗6½. Bei einer ─nderung protokolliert es in der dritten Spalte derselben Zeile den Zeitpunkt. Diese Bedingungen passen Sie im Listing beliebig an, die passenden Stellen finden Sie in der Datei auf der Heft-CD gut kommentiert.