Archiwa tagu: Day

Liczba dni w miesiącu

Opublikowany przez
Odpowiedz

Mała rzecz a cieszy 🙂 Jeszcze jedno zastosowanie bezcennej funkcji DateSerial

Function LiczbaDniMiesiaca(Rok As Long, Miesiac As Long) As Long
    LiczbaDniMiesiaca = Day(DateSerial(Rok, Miesiac + 1, 0))
End Function