Office: Datumformat im Textfeld durch VBA

Hi,

bin grad sehr am Kämpfen das Datum im Textfeld richtig anzeigen zu lassen.

Mein Ziel:
In Tabelle 1 ist ein Button wo durch anklicken ein UserFormular aufmacht. Gebe im UserFormular im Textfeld z.B. "1.9" als Datum ein und springe mit der Tabstop Taste weiter zum nächsten Textfeld. Im Textfeld sollte dann automatisch "01.09.2008" stehen, wie wenn man in einer Zelle "1.9" eingibt und es vervollständigt wird.

Egal was ich bis jetzt versucht habe, entweder wollte es garnicht mehr starten, es lief bis zu dem Punkt oder es passierte etwas ganz anderes als gewollt. Das beste was ich bis jetzt damit erreicht habe ist, das es mir das aktuelle Datum einfügt.

Habe eine Versuchsdatei angehängt, darin steht nocheinmal drin um was es geht.

Bin für jeden Vorschlag dankbar der dazu führt endlich die Formatierung mit dem Datum zu beherrschen. Desweiteren wäre eine kurze Erklärung zur Lösung (z.B. im Code als Komentar) nicht schlecht.

 

Der Rechner ist schuld....

Heute Morgen wollte der Code nicht laufen, jetzt (ohne Änderung) geht er einwandfrei..., dies passiert mir in letzter Zeit sehr oft.

Das soll mir mal jemand erklären wieso...

Code:

Private Sub TextBox1_AfterUpdate()
TextBox1 = Format(TextBox1, "DD.MM.YYYY")
End Sub

War ja 'ne Kleinigkeit, den Code hab ich hier mal reingestellt, vielleicht hilft es ja einen User weiter.
:mrgreen:

MfG E-MaX-I