Макрос на преобразование даты

Kahib · 07 авг 2009, 08:59

Всем доброго дня!
Очень нужен макрос, преобразующий дату формата 20090512 в формат 12.05.2009
Если у кого есть пример, прошу выложить

SAS888 · 07 авг 2009, 09:53

Можно так:

Dim s As String, dt As Date
s = "20090512"
dt = CDate(Left(s, 4) & " " & Mid(s, 5, 2) & " " & Right(s, 2))
MsgBox dt

EducatedFool · 07 авг 2009, 22:21