Hallo eine Frage, ich würde gerne die Zelle nach Datum Tag.Monat.Jahr und ausserdem beim zweiten auf Stunde:Minuten überprüfen aber leider macht Excel das nicht:
If Cells(x, 2).NumberFormat = "dd.mm.yyyy" Then
.Controls("Label_1_" & y).Caption = Cells(x, 2)
Else
.Controls("Label_1_" & y).Caption = "Eingabefehler"
End If
If Cells(x, 3).NumberFormat = "hh:mm" Then
.Controls("Label_2_" & y).Caption = Cells(x, 3)
Else
.Controls("Label_2_" & y).Caption = "Eingabefehler"
End If
Schon mal dankeschön vorweg.
Gruss
Chaos
|