Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Formatierung eines Eingabefeldes in VBA

Formatierung eines Eingabefeldes in VBA
04.04.2005 13:31:13
Bernd
Hallo liebe Excelisten,
ich habe in einer Form ein Textfeld und möchte, dass nur Uhrzeiten eingetragen werden können. z.B. 7:00 oder 23:59
Wo gibt es die Möglichkeit das Format zu definieren?
Mit freundlichen Grüßen
Bernd G.
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Formatierung eines Eingabefeldes in VBA
04.04.2005 14:06:23
Ceyser
Hi Bernd,
ich glaube man kann keine Formate für TextBoxen definieren. Aber man kann deren Wert prüfen.
zB beim Exit-Ereignis.

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
With TextBox1
If Not IsDate(.Text) Or _
InStr(.Text, ":") = False Or _
InStr(.Text, ".") Or _
.TextLength <> 5 Then
Cancel = True
End If
End With
End Sub

Gruß
CS
Anzeige
AW: Formatierung eines Eingabefeldes in VBA
04.04.2005 15:16:13
Bernd
Hallo CS,
vielen Dank, das ist auch sehr interessant.
Gruß
Bernd
AW: Formatierung eines Eingabefeldes in VBA
04.04.2005 14:10:47
P@ulchen
Hallo Bernd,
Du kannst aber auch gleich Fehleingaben verhindern:


Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Select Case KeyAscii
Case 48 To 57, 58   '58 = Doppelpunkt
Case Else: KeyAscii = 0
End Select
End Sub


Danach noch prüfen, ob nicht zB. 2 Doppelpunkte gesetzt wurden mit
If IsDate(TextBox1.Value)Then...
Gruß aus Leipzig
P@ulchen
Das Forum lebt auch von den Rückmeldungen !
Anzeige
AW: Formatierung eines Eingabefeldes in VBA
04.04.2005 15:14:32
Bernd
Hallo Paulchen,
vielen Dank, das hilft weiter...
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige