Seite 1 von 1
ostern
Verfasst: Mo, 06.03.2006 16:30
von Frankvas
gibt es eine laufzeit funktion um in einen programm das osterdatum zu ermitteln ? als tabellen function steht das zur verfügung ? Ich benötige das um in einer tabelle ein kalender zu erstellen .
grüsse
Verfasst: Mo, 06.03.2006 17:06
von Stephan
gibt es eine laufzeit funktion um in einen programm das osterdatum zu ermitteln ?
meines Wissens - nein.
als tabellen function steht das zur verfügung ?
Ja --> OSTERSONNTAG()
Gruß
Stephan
Verfasst: Mo, 06.03.2006 21:20
von Charly
Hallo!
Man kann die Funktion Ostersonntag auch selbst programmieren. Grundlage ist die Formel des Mathematikers Friedrich Gauß.
Um nicht mit der eingebauten Funktion Ostersonntag in Konflikt zu kommen, habe ich die Funktion Ostertag genannt.
Code: Alles auswählen
Function Ostertag(Jahreszahl)
a = Jahreszahl - 1900
b = a Mod 19
c = (7 * b + 1) \ 19
d = (11 * b + 4 - c) Mod 29
e = a \ 4
f = (a + e + 31 - d) Mod 7
g = 25 - d - f
h = 4
if g < 1 then
h = 3
g = g + 31
end if
Ostertag = Format(DateSerial(Jahreszahl, h, g), _
"dd.mm.yyyy")
End Function
Ich habe das schon mal in Excel verwendet. In OpenOffice hat mir jetzt bei der Umsetzung das DateSerial Schwierigkeiten gemacht, Excel kann da Minustage (=g) verarbeiten, OpenOffice dagegen nicht. Aber mit meiner IF-Abfrage konnte ich das Problem lösen.
Gruß
Charly
ostern
Verfasst: Di, 07.03.2006 17:31
von Frankvas
sieht gut aus werde die formel in mein programm einbauen
besten dank
frank