Habe in eine Userform eine Textbox eingefügt.
Diese soll als Voreinstellung das aktuelle Datum haben und dann in Zelle P2 das Datum schreiben.
Private Sub TextBox1_Change()
With UserForm1
TextBox1.Value = Format(Date)
End With
Worksheets("Test").Range("P2").Value = Me.TextBox1
End Sub
funktioniert soweit...
Wie bekomme ich es hin, das aktuelle Datum in der Textbox wieder zu überschreiben?
Desweiteren zeigt er mir das Datum erst an, wenn ich eine Taste drücke.
Gruß
Kasi