Textboxen formatieren!?
16.12.2003 10:51:17
Andre
ich rufe aus einer UserForm eine zweite Userform auf. Das klappt auch. Es funktioniert auch folgender Code, um die Textboxen der zweiten Userform zu füllen, aber es ist zum Schreien, ich bekomme die drei entscheidenen Textboxen nicht als Zeit formatiert! Das ist wirklich nervig und ich hoffe jemand hat ´ne Idee wie´s funktionieren könnte!
Private Sub UserForm_Initialize()
Datum = Range("h4").Value
Start = Range("b2").Value
Start.Text = Format(Start, "h:mm")
Dauer = Range("e4").Value
Ende = Range("d4").Value
Ende.Text = Format(Ende, "h:mm")
Gast = Range("i4").Value
Personal = Range("j4").Value
Raum = Range("g4").Value
Bemerkung = Range("k4").Value
End Sub
Gruß Andre