Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1672to1676
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

4-stellige Zahlenkette in Datum xx.xx.xxxx wandeln

4-stellige Zahlenkette in Datum xx.xx.xxxx wandeln
07.02.2019 11:29:02
Fabian
Hallo zusammen,
ich komme mit einer Makro aktuell leider nicht wieter. Folgendes habe ich vor:
In einem Userform gibt der Benutzer eine 4-stellige Zahlenkette ein. Diese soll als Datum im Format xx.xx.xxxx in Zelle B2 ausgegeben werden. Im weiteren Verlauf wird u.a. das Datum per Outlook versendet und der Inhalt der Zelle am Ende des Makros wieder gelöscht.
Ich habe es bereits versucht, per Formatierung zu ändern, es klappt aber leider nicht.
Könnt ihr mir helfen?
LG

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

Betreff
Datum
Anwender
Anzeige
AW: 4-stellige Zahlenkette in Datum xx.xx.xxxx wandeln
07.02.2019 11:33:22
SF
Hola,
und die 4 Zahlen repräsentieren genau was?
Gruß,
steve1da
AW: 4-stellige Zahlenkette in Datum xx.xx.xxxx wandeln
07.02.2019 11:43:37
Schwarzwaelder
Formartierung habe ich auch schon erfolglos versucht.
Versuche es mal so: (die vierstellige Zahlenkette steht in B2 (z.B. 1512; das JAhr steht in B1 (2019)
Formel in C2: =DATUM(B1;RECHTS(B2;2);LINKS(B2;2))
Damit müsste die Umwandlung klappen
Vielen Dank an Fabian, der hier die Lösung postete
AW: 4-stellige Zahlenkette in Datum xx.xx.xxxx wandeln
07.02.2019 11:44:56
Schwarzwaelder
Formartierung habe ich auch schon erfolglos versucht.
Versuche es mal so: (die vierstellige Zahlenkette steht in B2 (z.B. 1512; das JAhr steht in B1 (2019)
Formel in C2: =DATUM(B1;RECHTS(B2;2);LINKS(B2;2))
Damit müsste die Umwandlung klappen
Vielen Dank an Fabian, der hier die Lösung postete
Gemeint ist natürlich Steve1da :-)
Anzeige
AW: 4-stellige Zahlenkette in Datum xx.xx.xxxx wandeln
07.02.2019 13:18:08
Daniel
Hi
Probier mal:
Range("B2").Value = CDate(Format(CLng(DeineEingabe), "00\.00"))
DeineEingabe ist die 4-Stellige Zahlenkette.
Gruß Daniel

265 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige