LEADERSOFT.ru Разработка на заказ программ и сайтов
Форумы по информационным технологиям
 
Регистрация  |  Вход
left
Форумы Минимизировать
ПоискСписок форумов
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: Есть ли в...
 Тема: Есть ли в VBA такая функция
 
 15.06.2007 21:03:38
Геннадий1
10 сообщения


Тема: Есть ли в VBA такая функция
К примеру есть дата 324.01

Так вот первая часть до точки - порядковый день года
вторая часть - год

Как из этого получить полноценную дату?




P.S. Проблемы с базой данных
Автор: Геннадий от 17.01.2003 14:24:10 Источник ...
 15.06.2007 21:03:38
All
4316 сообщения
1-ый


RE: Есть ли в VBA такая функция
Вот один из вариантов.
Dim d As Date, s As String
s = "234.01"
d = CDate(Left(s, 3) + DateSerial(Right(s, 2), 1, 0))
Debug.Print Format(d, "dd mm yyyy")

P/S Интересная задача. Может быть кто-нибудь придумает и более общий способ, чтобы не привязываться к положению точки.



P.S. Проблемы с базой данных
Автор: Виктор Конюков от 0:00:00 Источник ...
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: Есть ли в...
ПоискПоиск  Список форумовСписок форумов  
right