Datumeingabe in Userform

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
UserForm TextBox MsgBox


Excel-Version: 8.0 (Office 97)
nach unten

Betrifft: Datumeingabe in Userform
von: BeGro
Geschrieben am: 19.06.2002 - 10:35:38

Hallo liebe Excel-Spezialisten,
ich habe in einer UserForm eine TextBox und möchte hier ein gültiges Datum eingeben und nichts anderes.
Kann mir jemand sagen wie ich das elegant lösen kann.

Vielen Dank für die Hilfe.

Gruß
BeGro


nach oben   nach unten

Re: Datumeingabe in Userform
von: @lex
Geschrieben am: 19.06.2002 - 10:59:02

Hallo Bernd !
Ohne zu testen und aus dem Bauch raus.

If IsDate(TextBox1.Value) Then
Debug.Print "Ja"
Else:
Debug.Print "Nein"
TextBox1.Value = ""
TextBox1.SetFocus
End If

VG,
Alex

nach oben   nach unten

Re: Datumeingabe in Userform
von: BeGro
Geschrieben am: 19.06.2002 - 11:17:36

Gibt es so etwas auch mit einem fertigen Kalender wo ich nur den Tag auswähle?

Gruß BeGro


nach oben   nach unten

Re: Datumeingabe in Userform
von: @lex
Geschrieben am: 19.06.2002 - 11:30:26

Schau mal in der Entwicklungsumgebung,
dort ist in der "Werkzeugkiste" auch ein Steuerelement Kalender, ggfs. über Verweise installieren.
Das Datum kannst Du dann mit
bswp. msgbox Calender1.Value abfangen

VG,
Alex


nach oben   nach unten

Re: Datumeingabe in Userform
von: BeGro
Geschrieben am: 19.06.2002 - 11:31:15

ISDATE() fragt das amerikanische Datum auf Gültigkeit ab. Was muß ich machen, damit er "unser" Format verwendet?

Gruß
Bernd


 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Datumeingabe in Userform"