erzwungenerTextboxeintrag deaktivieren
15.12.2005 10:40:26
Gisela
die Eingabe in eine Textbox wird mit folgendem Code erzwungen.
Private Sub TextBox3_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Not IsDate(TextBox3.Text) Then
MsgBox "Es muss eine gültige Datumseingabe erfolgen, oder beenden über schliessen oder eine andere Auswahl!"
Cancel = True
Else
TextBox3.Value = Format(CDate(TextBox3.Value), "dd.mm.yy")
End If
End Sub
Das ist alles ok.
Kann diese Anweisung über einen CommandButton deaktiviert/bzw. aktiviert werden? Und wenn ja, kann mir bitte jemand sagen, was der Code des CommandButton enthalten muß.
Vielen Dank und Grüße
Gisela