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

Forumthread: Datum aus String

Datum aus String
Daniel
Hallo,
ich möchte aus dem Dateinamen der Datei, deren Daten ich per Makro verarbeite, das Datum extrahieren. Der Dateiname hat immer das Format
abcdef_ddMMYY.xlsm
Also für heute abcdef_190112.xlsm.
Ich bin bis hier gekommen:
Dim datum As Date
datum = Split(Right(wkb.Name, 13), ".")(0)
Wie wandle ich den String nun in das Datum um?
Grüße
Daniel
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Datum aus String
19.01.2012 15:38:59
Rudi
Hallo,
als Anregung:
Sub xxxx()
Dim strDat As String, dteDat As Date
Const strWkb As String = "abcdef_190112.xlsm"
strDat = Left(Split(strWkb, "_")(1), 6)
dteDat = DateSerial(Right(strDat, 2) * 1, Mid(strDat, 3, 2) * 1, Left(strDat, 2) * 1)
End Sub

Gruß
Rudi
Anzeige
Super, danke. o.T.
19.01.2012 15:52:14
Daniel
..
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige