[Code] [VBA] Uhrzeitformat überprüfen

H5N1 · 6. Dezember 2012

[VBA] Uhrzeitformat überprüfen

Hallo ich habe ein Problem mit dem Prüfen einer Eingabe von Usern.
Sie sollen in eine Zelle eine Uhrzeit angeben.
Die Eingabe der User ist meist hh:mm.
Die Zelle formatiert dieses dann auf hh:mm:ss.
Ich will nur einfach überprüfen, ob die Eingabe auch wirklich mit einem Doppelpunkt erfolgt.
Es sollen keine Eingaben mit zB einem Punkt erfolgen:
Sprich erlaubt ist

hh:mm

alles andere wie hh.mm hh;mm soll als Fehler erkannt werden und dem User bekannt gegeben werden, dass er dies bitte ändern.

IsDate hat nicht funktioniert und

Code:

If Range(Target).NumberFormat Like "hh:mm:ss" = False Then

funktioniert auch nicht.

Danke für jede Hilfe

MfG
H5N1

Anzeige

LuZi · 6. Dezember 2012

AW: [VBA] Uhrzeitformat überprüfen

ich kenn mich jetzt mit vba nicht aus aber sollte es nicht heissen:

[NFO]If Range(Target).NumberFormat="hh:mm:ss"
Then
Else[/NFO]

Nash · 6. Dezember 2012

AW: [VBA] Uhrzeitformat überprüfen

Sowas kannst du machen

Code:

If IsDate(vZeit) Then

 If CSng(vZeit) <= 1 And CSng(vZeit) >= 0 Then
 MsgBox "Zeitwert!"

 End if
End if

Code:

If len([a1].text) = 5 And InStr([a1].Text, ":") = 2 Then
 MsgBox "Zeitwert!"
End If

LuZi hat recht, ein Like gibts nur im SQL.

Nützliche Suchen

[Code] [VBA] Uhrzeitformat überprüfen

Videos zum Themenbereich