Dateneingabe durch Maske nicht erkannt
11.11.2007 14:14:26
Ludger
zur Zeit wird in meiner Tabelle bei Dateneingabe in A1 bis A100 in B1 usw. das aktuelle Datum geschrieben und anschließend wie gewünscht nicht mehr aktualisiert. Funktioniert mit folgenden Zeilen ausgezeichnet:
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A1:A100")) Is Nothing Then Exit Sub
If Target.Value "" Then
Target.Offset(0, 1).Value = Date
Else
Target.Offset(0, 1).ClearContents
End If
End Sub
Doch jezt mein Problem:
Erfolgt die Dateneingabe in A1 usw. über eine Maske, so reagiert er auf die eingegebenen Daten nicht, hält A1 offensichtlich für leer und schreibt in B1 nicht das gewünschte Datum. Die Daten in A1 sind aber da und lesbar.
Würde mich über Hilfe sehr freuen und bin gespannt!
Ludger