Format in Userform
12.02.2017 16:32:04
chris58
ich hätte noch ein Frage bezüglich des Formates das ich in eine Userform eingebe.
Was muß ich machen, damit ich bei der Textbox1 das Datum 10102016 und
in Textbox2 die Zeit 073025 eingeben kann und es dann mit Punkt bzw. Doppelpunkt aufscheint.
Danke für Eure Hilfe
chris
Private Sub CommandButton1_Click()
Sheets("Eingabe").Range("A2") = Format(TextBox1.Value, "dd.MM.yyyy")
Sheets("Eingabe").Range("B2") = Format(TextBox7.Value, "hh:mm:ss")
Sheets("Eingabe").Range("C2") = TextBox10.Value
Unload Me
End Sub
Private Sub CommandButton2_Click()
Unload UserForm1
End Sub
Private Sub UserForm_Initialize()
TextBox1.Value = Sheets("Eingabe").Range("A2").Value
TextBox7.Value = Sheets("Eingabe").Range("B2").Value
TextBox10.Value = Sheets("eingabe").Range("C2").Value
End Sub
Anzeige