Как узнать сколько дней в месяце, по дате без циклов? - VBA (56580)
Формулировка задачи:
Ктонибудь знает как узнать сколько дней в месяце, по дате без циклов.
Например 10.2004 сколько в нём дней или какое последнее число.
Решение задачи: «Как узнать сколько дней в месяце, по дате без циклов?»
textual
Листинг программы
Sub Тест() Dim datDate As Date Dim bytDay As Byte datDate = "1.10.2004" bytDay = Day(DateAdd("d", -1, (DateAdd("m", 1, datDate)))) End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д