Напомните?
Последний день месяца
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Сообщений: 7
• Страница 1 из 1
- Scuder
- Постоялец
-
- Сообщения: 334
- Зарегистрирован: 17.08.2002 (Сб) 13:18
- Откуда: Moscow, Russia
Последний день месяца
Scuder » 03.12.2004 (Пт) 16:59
Помнится, где-то я видел очень простой вариант определения последнего дня указанного месяца, но поиск по форуму и рамблеру ожидаемых результатов не дал.
Напомните?
Напомните?
- Konst_One
- Член-корреспондент академии VBStreets
-
- Сообщения: 3041
- Зарегистрирован: 09.04.2004 (Пт) 13:47
- Откуда: Химки
Konst_One » 03.12.2004 (Пт) 17:05
- Код: Выделить всё
VBa.DateSerial(year(vba.Date),vba.Month(vba.Date)+1,1-1)
- Scuder
- Постоялец
-
- Сообщения: 334
- Зарегистрирован: 17.08.2002 (Сб) 13:18
- Откуда: Moscow, Russia
Scuder » 03.12.2004 (Пт) 17:17
alibek писал(а):Или, как другой вариант, следующий месяц минус 1.
- Код: Выделить всё
Dim sss As Date
sss = "01.01.2005"
MsgBox sss - 1
Тут переменную объявлять надо..
Сообщений: 7
• Страница 1 из 1
Кто сейчас на конференции
Сейчас этот форум просматривают: Yandex-бот и гости: 28