Страница 1 из 1

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

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

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

Добавлено: 07 авг 2009, 09:53
SAS888
Можно так:

Код: Выделить всё

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

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

Добавлено: 07 авг 2009, 22:21
EducatedFool