Datum in Textbox auf UF

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
UserForm TextBox
Bild

Betrifft: Datum in Textbox auf UF
von: Andre
Geschrieben am: 09.07.2015 13:55:01

Hallo liebes Forum,
ich habe eine Userform, da möchte ich über eine Textbox das Datum reinschreiben und in eine Tabelle eintragen und mir wieder anzeigen lassen. (Office 2010) wie bekomme ich es per VBA hin?
Danke für eure Anregungen

Bild

Betrifft: AW: Datum in Textbox auf UF
von: Daniel
Geschrieben am: 09.07.2015 14:05:30
Hi
das Schreiben des Textboxinhaltes in eine Zelle als Datum:

if IsDate(Textbox1.text) Then Range("A1").Value = CDate(Textbox1.Text)

das Anzeigen des Zellwertes als Text in der Textbox:
Textbox1.Text = Range("A1").Text

das .Text bei Range liest den formatierten Zellwert aus, so wie er angezeigt wird.
wenn das Datum unabhänngig von der Formatierung des Zellformats angezeigt werden soll.
Textbox1.Text = Format(Range("A1").Value, "DD.MM.YYYY")
Gruß Daniel

Bild

Betrifft: AW: Datum in Textbox auf UF
von: Andre
Geschrieben am: 09.07.2015 14:12:04
vielen dank für die schnelle Antwort. Leider funktioniert es bei mir nicht, weil es sich um verschiedene Zellen handelt und nicht um eine feste Zelle.

Bild

Betrifft: AW: Datum in Textbox auf UF
von: Daniel
Geschrieben am: 09.07.2015 14:23:20
Ist ja auch nur beispielhaft wie es prinzipell funktioniert.
setze für das Range("A1") einfach deine verschiedenen Zellen ein.´
Gruß Daniel

Bild

Betrifft: AW: Datum in Textbox auf UF
von: Andre
Geschrieben am: 09.07.2015 15:11:20
Hallo mal ist es j12 dann j 24 also geht es ja nicht mit range

Bild

Betrifft: AW: Datum in Textbox auf UF
von: Daniel
Geschrieben am: 09.07.2015 23:40:59
Hi
du kannst auch Cells(ZeilenNr, SpaltenNr) nehmen.
da kannst du dann Variablen einfacher verwenden als in Range.
Gruss Daniel

 Bild

Beiträge aus den Excel-Beispielen zum Thema "Datum in Textbox auf UF"