Herbers Excel-Forum - das Archiv
Datum von Ostern berechnen
- Datum von Ostern berechnen von Stevie vom 07.03.2005 18:42:27
- AW: Datum von Ostern berechnen - von Matthias G am 07.03.2005 18:43:52
- AW: Datum von Ostern berechnen - von Stevie am 07.03.2005 18:58:31
- AW: Datum von Ostern berechnen - von Ramses am 07.03.2005 20:21:46
- AW: Datum von Ostern berechnen - von Ramses am 07.03.2005 20:21:46
- AW: Datum von Ostern berechnen - von Stevie am 07.03.2005 18:58:31
 |
Betrifft: Datum von Ostern berechnen
von: Stevie
Hallo
Ich habe eine Kalendervorlage erstellt. Man gibt das Jahr ein und der Kalender wird aufgebaut. Neben den farblich hervorgehobenen Wochenenden und festen Feiertagen soll er auch Ostern anzeigen.
Wer weiß, wie man das Datum der Osterfeiertage berechnet?
Ostern ist immer das Wochenende nach dem 1. Vollmond nach Frühlingsanfang!
Sonnige Grüße
Stevie
 |
Betrifft: AW: Datum von Ostern berechnen
von: Matthias G
Geschrieben am: 07.03.2005 18:43:52
Hallo Stevie,
http://www.excelformeln.de/formeln.html?welcher=3
Gruß Matthias
|
Betrifft: AW: Datum von Ostern berechnen
von: Stevie
Geschrieben am: 07.03.2005 18:58:31
Danke für die prompte Antwort, werd es gleich einpflegen!!!
Einen schönen Abend noch!
Stevie
|
Betrifft: AW: Datum von Ostern berechnen
von: Ramses
Geschrieben am: 07.03.2005 20:21:46
Hallo
oder als Alternative
| ||||||||||||||
Und den Code in ein Modul deiner Arbeitsmappe:
Option Explicit
Function EasterDate(Yr As Integer) As Date Dim d As Integer d = (((255 - 11 * (Yr Mod 19)) - 21) Mod 30) + 21 EasterDate = DateSerial(Yr, 3, 1) + d + (d > 48) + 6 - ((Yr + Yr \ 4 + d + (d > 48) + 1) Mod 7) End Function
Gruss Rainer
| |