range-Bereich kann nicht erkannt werden
17.02.2004 10:53:52
lemon
Hat jemand vielleicht eine Idee? Für jeden Tipp bin ich dankbar!
1 Dim spalte As Long
2 Dim zeile As Long
4 spalte = Target.Column
5 zeile = Target.Row
8 If Cells(zeile, "G") <> "" Then
9 Cells(zeile, "H") = Now
10 Cells(zeile, "I").Locked = False
11 Else
12 Cells(zeile, "H") = ""
13 End If