Skottår
23 svar · 1 368 visningar · startad av Organick · sida 2 av 2
Trådstarten, av Organick
Hvordan laver jeg min kalender til at klare at regne ud hvornår det er skottår? Function getMonth(monthNr) Select Case monthNr Case 1 manad = "Januari" Case 2 manad = "Februari" Case 3 manad = "Mars" Case 4 manad = "April" Case 5 manad = "Maj" Case 6 manad = "Juni" Case 7 manad = "Juli" Case 8 manad = "Augusti" Case 9 manad = "September" Case 10 manad = "Oktober" Case
Läs hela trådstarten →
Ja, jeg har set efter det og prøvet det, men den regner ikke skudår, eller jeg får det ihverfald ikke at virke. Newbie here...
Kan nogen forklare end endelig løsning?
Jodå, den räknar med skottår. Se bara till att rätt år matas in. Tips är att skriva så här:
Function getDays(yearNr, monthNr)
getDays = Day(DateSerial(yearNr, monthNr + 1, 0))
End Function
Och sen anropa med t.ex. getDays(2008, 2).
Tok fel