Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Datum in Textbox auf Userform im Format tt.mm.jj

Datum in Textbox auf Userform im Format tt.mm.jj
23.08.2007 19:14:09
Peter
Hallo alle zusammen,
auf meiner Userform befindet sich eine Textbox "txtDatum" in der nach Initialisierung der Userform das heutige Datum im Format tt.mm.jjjj erscheint. (Me.txtDatum = Date)
Ich möchte, dass es im Format tt.mm.jj erscheint.
Wie macht man das?
Danke im Voraus
Grüße aus Berlin
eine kleine einfache Beispieldatei: https://www.herber.de/bbs/user/45337.xls

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Datum in Textbox auf Userform im Format tt.mm.jj
23.08.2007 19:19:11
Hajo_Zi
Hallo Peter,
benutze den Format Befehl. Der ist in der Hilfe gut beschrieben.

AW: Datum in Textbox auf Userform im Format tt.mm.
23.08.2007 19:31:00
Peter
Danke, habs hinbekommen.

AW: Datum in Textbox auf Userform im Format tt.mm.jj
23.08.2007 19:33:45
Chaos
Servus Peter,
so:

Private Sub UserForm_Initialize()
txtDatum = Date
txtDatum = Format(CDate(txtDatum.Value), "dd.mm.yy")
End Sub


Gruß
Chaos

Anzeige
AW: war wohl zu langsam! :-))
23.08.2007 19:34:54
Chaos
.
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Datum in Textbox auf Userform im Format tt.mm.jj


Schritt-für-Schritt-Anleitung

Um das Datum in einer Textbox auf einer Userform im Format tt.mm.jj anzuzeigen, kannst du die folgenden Schritte befolgen:

  1. Öffne den VBA-Editor: Drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Füge eine Userform hinzu: Klicke mit der rechten Maustaste im Projektfenster und wähle Einfügen > UserForm.

  3. Füge eine Textbox hinzu: Ziehe eine Textbox (z.B. txtDatum) auf die Userform.

  4. Initialisiere die Userform: Füge den folgenden Code in das Codefenster der Userform ein:

    Private Sub UserForm_Initialize()
       txtDatum.Value = Format(Date, "dd.mm.yy")
    End Sub
  5. Schließe den VBA-Editor: Speichere deine Änderungen und schließe den Editor.

  6. Teste die Userform: Führe die Userform aus, um das Datum im gewünschten Format anzuzeigen.


Häufige Fehler und Lösungen

  • Fehler: Datum wird nicht korrekt angezeigt
    Lösung: Stelle sicher, dass die Textbox richtig benannt ist und der Code im UserForm_Initialize-Ereignis ausgeführt wird.

  • Fehler: Format wird nicht übernommen
    Lösung: Überprüfe, ob der Format-Befehl korrekt verwendet wird. Der richtige Befehl ist Format(Date, "dd.mm.yy").


Alternative Methoden

Wenn du eine andere Methode zur Anzeige des Datums in der Textbox verwenden möchtest, kannst du auch die CDate-Funktion nutzen. Hier ist ein Beispiel:

Private Sub UserForm_Initialize()
    txtDatum.Value = Format(CDate(Date), "dd.mm.yy")
End Sub

Diese Methode ist nützlich, wenn du das Datum aus einer anderen Quelle umwandeln möchtest.


Praktische Beispiele

Hier ist ein einfaches Beispiel, wie du das Datum in der Textbox formatieren kannst:

Private Sub UserForm_Initialize()
    Dim heute As Date
    heute = Date
    txtDatum.Value = Format(heute, "dd.mm.yy")
End Sub

Dieses Beispiel zeigt das heutige Datum im Format tt.mm.jj an.


Tipps für Profis

  • Verwende benutzerdefinierte Datumsformate: Du kannst auch andere Formate wie mm.jj oder tt/mm/jj verwenden, indem du das Format entsprechend anpasst.
  • Validierung der Eingabe: Überlege, eine Validierung hinzuzufügen, damit das Datum im richtigen Format eingegeben wird. Das kannst du im BeforeUpdate-Ereignis der Textbox tun.

FAQ: Häufige Fragen

1. Was bedeutet mm/jj?
Das Format mm/jj steht für den Monat (mm) und das Jahr (jj) und wird häufig in Datumsangaben verwendet.

2. Wie kann ich das Datum in der Textbox nachträglich ändern?
Du kannst den Wert der Textbox jederzeit im Code ändern, indem du einfach txtDatum.Value = "neues Datum" verwendest und das gewünschte Datum im richtigen Format angibst.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige