Ostersonntags-Berechnung

[Rabe]

Hi,

ich habe heute bemerkt, daß bei einem meiner Kalender die Osterberechnung nicht korrekt funktioniert, d.h. die Formel rechnet nicht richtig, denn Ostersonntag ist ja am 16.04.2017 gewesen:

Feiertage

	I	J
6	2017
7	15.04.2017	Ostersonntag

verwendete Formeln
Zelle	Formel	Bereich	N/A
I7	=DATUM($I$6;4;((TAG(MINUTE($I$6/38)/2+55))/7)*7-6)

Excel-Inn.de

Hajo-Excel.de

XHTML-Tabelle zur Darstellung in Foren, einschl. der neuen Funktionen ab Version 2007

Add-In-Version 19.08 einschl. 64 Bit

[BoskoBiati]

Hi,

diese Formel gilt nur für 1904-Datumswerte!

[RPP63]

Moin Ralf!
Nimm doch die von Excelformeln:

	A
1	2017
2	16.04.2017

Formeln der Tabelle

Zelle Formel A2 =RUNDEN((TAG(MINUTE(A1/38)/2+55)&".4."&A1)/7;)*7-6

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4.8

Ich persönlich habe eine UDF in meiner Personal.xlsb
Die funktioniert immer, sie nutzt die erweiterte Gauß-Formel nach Lichtenberg:

Function Ostersonntag(ByVal j As Integer) As Date
' Ergänzte Gauß-Formel nach Heiner Lichtenberg (1997) 
' http://de.wikipedia.org/wiki/Gau%C3%9Fsche_Osterformel#Eine_erg.C3.A4nzte_Osterformel 
' VBA-Umsetzung durch RalfP 

' Variablenbedeutung 
' x(0) = Säkularzahl 
' x(1) = säkulare Mondschaltung 
' x(2) = säkulare Sonnenschaltung 
' x(3) = Mondparameter 
' x(4) = Keim für ersten Frühlingsvollmond 
' x(5) = kalendarische Korrekturgröße 
' x(6) = Ostergrenze 
' x(7) = erster Sonntag im März 
' x(8) = Osterentfernung in Tagen 
' x(9) = Datum des Ostersonntags als Märzdatum (32. März = 1. April usw.) 

Dim x(9) As Long
   x(0) = j \ 100
   x(1) = 15 + (3 * x(0) + 3) \ 4 - (8 * x(0) + 13) \ 25
   x(2) = 2 - (3 * x(0) + 3) \ 4
   x(3) = j Mod 19
   x(4) = (19 * x(3) + x(1)) Mod 30
   x(5) = (x(4) + x(3) \ 11) \ 29
   x(6) = 21 + x(4) - x(5)
   x(7) = 7 - (j + j \ 4 + x(2)) Mod 7
   x(8) = 7 - (x(6) - x(7)) Mod 7
   x(9) = x(6) + x(8)
Ostersonntag = DateSerial(j, 3, x(9))
'denn der 32.3. ist automatisch der 1.4. 
End Function

	A
1	2017
2	16.04.2017
3	16.04.2017

Formeln der Tabelle

Zelle Formel A2 =RUNDEN((TAG(MINUTE(A1/38)/2+55)&".4."&A1)/7;)*7-6 A3 =PERSONAL.XLSB!Ostersonntag(A1)

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4.8


Gruß Ralf

[neopa]

Hallo Edgar, hallo Ralf,

was Edgar schrieb, dachte ich zunächst auch. Allerdings scheint das nur für die neueren Excelversionen so zu gelten.
In Excel2010 wird bei gesetzter Option "1904 Datumswerte" der 15.04.17 angezeigt.

[BoskoBiati]

Hi,

die Formel rechnet einfach nur falsch. Ich weiß nicht, wo Du die her hast, aber die ist für die Tonne!!!

Arbeitsblatt mit dem Namen 'Tabelle1'
	I	J	K
6	2015	08.04.2015	05.04.2015
7	2016	28.03.2016	27.03.2016
8	2017	16.04.2017	16.04.2017
9	2018	05.04.2018	01.04.2018
10	2019	23.04.2019	21.04.2019
11	2020	13.04.2020	12.04.2020
12	2021	02.04.2021	04.04.2021

Zelle	Formel
J6	=DATUM($I6;4;((TAG(MINUTE($I6/38)/2+55))/7)*7-5)
K6	=RUNDEN((TAG(MINUTE(I6/38)/2+55)&".4."&I6)/7;)*7-6

Diese Tabelle wurde mit Tab2Html (v2.4.1) erstellt. ©Gerd alias Bamberg

[neopa]

Hallo Edgar,

Formel steht in Excelformeln.de  und da ist bereits auf diese Problematik hingewiesen.

[BoskoBiati]

Hallo Werner,


da habe ich als Erstes nachgesehen, aber die Formel von Rabe habe ich da nicht gefunden, auch nach dreimaligem Durchlesen nicht.

[neopa]

Hallo Edgar,

wo Du Recht hast Du Recht.

Allerdings hatte ich auf dem ersten flüchtigen Blick gemeint, in der von Ralf benutzten Formel  die Formel aus Excelformeln.de zu erkennen und hatte letztere zum Test in meine 2010er Version  kopiert und da wird der 15.04.17 bei gesetzter "1904er Option angezeigt.

[Wilfried Höttl]

Hallo!

Diese Osterformel habe ich in einem Forum gefunden.

Tabelle1

	A	B
2	1900	So 15.04.1900
3	2079	So 23.04.2079
4	2017	So 16.04.2017
5	9999	So 28.03.9999

Formeln der Tabelle

Zelle Formel B2 =DM(((9&-A2)+29*REST(REST(A2;19)/1,5792-0,484+DM(42,7%*LINKS(A2;2)+TAG(586*LINKS(A2;2))/32;)/30;1))/7;)*7-160

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4

Gruß
Wilfried

[Rabe]

Hi,

die Formel rechnet einfach nur falsch. Ich weiß nicht, wo Du die her hast, aber die ist für die Tonne!!!

keine Ahnung, wo ich die mal her hatte.