ich habe da so ein kleines problem mit der berechnung des ostersonntages im zusammenhang mit den 1904 datumswerten..
irgendwie ist der ostersonntag 2002 bei mir immer am samstag dem 13.04.02 und nicht wie es sein sollte am sonntag dem 31.03.02 *langsam verzweifelt*
welche möglichkeiten gibt es denn noch????
PS: das skript das ich zur zeit benutze
Function Ostern(Yr As Integer) As Date
Dim D As Integer
D = (((255 - 11 * (Yr Mod 19)) - 21) Mod 30) + 21
Ostern = DateSerial(Yr, 3, 1) + D + (D > 48) + 6 - _
((Yr + Yr \ 4 + D + (D > 48) + 1) Mod 7)
End Function
aufrufen tu ich es mit "=Ostern(j-4)" (die -4 weil es sonst 2006 ist)