Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 14:59:21
23.04.2024 14:47:39
23.04.2024 14:23:45
Anzeige
Archiv - Navigation
1800to1804
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Textbox: vier Ziffern als Zeit

Textbox: vier Ziffern als Zeit
24.12.2020 18:50:32
Ecki
Liebe VBA-Freunde
Euch allen Frohe Weihnacht (ich hocke leider in der Klinik)
Eigentlich sollte es einfach sein, aber ich kriege es nicht hin:
Bei der Eingabe von 4 Ziffern in die Textbox(TimeOfEntry) soll die Zeit erscheinen (hh:mm)
Mein Code:

Private Sub TimeOfEntry_Change()
TimeOfEntry.Text = Format(TimeOfEntry.Text, "hh:mm")
End Sub

Er tut es aber nicht.
Wo liegt mein Fehler
LG von Ecki

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Textbox: vier Ziffern als Zeit
24.12.2020 19:31:33
onur
Hier mit Überprüfung, ob gültige Uhrzeit:
Private Sub TimeOfEntry_Change()
Dim ti, t As Double
If Len(TimeOfEntry) = 4 Then
TimeOfEntry = Format(TimeOfEntry, "00\:00")
If Not IsDate(TimeOfEntry) Then
TimeOfEntry = ""
Exit Sub
End If
End If
End Sub

AW: Textbox: vier Ziffern als Zeit
24.12.2020 19:47:55
Ecki
Lieber Onur
Vielen lieben Dank - klappt perfekt! Ich wünsche allen nochmals Frohe Festtage :-)
LG von Ecki
Gerne !
24.12.2020 19:48:32
onur
Gerne !
24.12.2020 19:49:31
onur

Dim ti, t As Double

Kann weg, ist nur Testmüll.
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige