Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - VBA

Страница: 1 |

 

  Вопрос: Дата Добавлено: 18.09.04 02:06  

Автор вопроса:  bsv | ICQ: 209134224 
имеется дата - 25.01.1001
каким образом можно прибить 1 год неск лет неск месяцев
25.01.1001+year(1)
25.01.1001+year( кол-во лет)
25.01.1001+month( кол-во лет)
не проходит

Ответить

  Ответы Всего ответов: 5  

Номер ответа: 1
Автор ответа:
 CyRax



Разработчик Offline Client

ICQ: 204447456 

Вопросов: 180
Ответов: 4229
 Web-сайт: basicproduction.nm.ru
 Профиль | | #1
Добавлено: 18.09.04 03:36
http://basicproduction.nm.ru/Age.rar

Ответить

Номер ответа: 2
Автор ответа:
 Дмит



Вопросов: 11
Ответов: 160
 Web-сайт: dimit.pochta.ru
 Профиль | | #2
Добавлено: 18.09.04 19:14
DateSerial(1001 + 0, 1 + 0, 25 + 0)
Подставь за место 0 “неск лет неск месяцев” или количество дней.
Кстати поставив эту дату в ячейку, получишь ошибку. Excel обрабатывает даты с 1 января 1900г в отличии от VBA.
Дмитрий

Ответить

Номер ответа: 3
Автор ответа:
 Павел



Администратор

ICQ: 326066673 

Вопросов: 368
Ответов: 5968
 Web-сайт: www.vbnet.ru
 Профиль | | #3
Добавлено: 19.09.04 06:10
Для этого используется функция DateAdd.

Ответить

Номер ответа: 4
Автор ответа:
 mc-black



ICQ: 308-534-060 

Вопросов: 20
Ответов: 1860
 Web-сайт: mc-black.narod.ru/dzp.htm
 Профиль | | #4
Добавлено: 19.09.04 13:45
'Прибавить 3 месяца
myDate = DateAdd("m", 3, myDate)
'Прибавить 5 лет
myDate = DateAdd("y", 5, myDate)
'и т.д., подробности в Help :)

Ответить

Номер ответа: 5
Автор ответа:
 Дмит



Вопросов: 11
Ответов: 160
 Web-сайт: dimit.pochta.ru
 Профиль | | #5
Добавлено: 19.09.04 22:16
Кстати при таком формате myDate = DateAdd("yyyy", 5, myDate)
Дмитрий

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам