Bei Änderung Datum in Nachbarzelle schreiben
07.01.2009 15:33:47
Georg
wenn eine Zelle A2 geändert wird (durch Formelbezug nicht durch Handeingabe) dann soll in eine andere Zelle (C2) in der selben Zeile das aktuelle Datum geschrieben werden.
Dazu habe ich bereits was im Netz gefunden:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$2" Then ActiveSheet.Range("C2").Value = Date
End Sub
aber es passt leider nicht ganz, weil - wie gesagt - die Zelle A2 nicht händisch, sondern durch Formelbezug geändert wird. D. h. es müsste in dem VBA-Code etwas mit If Cell(A2).Change Then ... lauten
Kann man das vielleicht sogar so schreiben, dass es für alle Zeilen im Tabellenblatt gilt (also nicht nur A2 und C2, sondern A und C allgemein) und ich nicht jede Zeile extra codieren muss?
Grüße
Georg
