Ich will bei jeder Änderung in einer Zelle Spalte D das aktuelle Datum in Spalte B generieren. Wenn ich also in Zelle D4 etwas ändere, soll in Zelle B4 das aktuelle Datum (=Heute()) geschrieben werden.
Zum voraus vielen Dank
Gregor
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 4 Then
Target.Offset(0, -2) = Date
End If
End Sub