Auteur Topic: feestdagen automatisch herberekenen (gelezen 4260 keer)

Startbaan · « **Gepost op:** 17 december 2004, 10:19:43 »

Goeiemorgen

Ik ben momenteel bezig om de feestdagen te veranderen naar de data van 2005.
Bestaat er ergens een formule om deze ieder jaar op bv. 31 december of vroeger te laten veranderen naar het volgend jaar of moet dit telkens manueel worden ingegeven?

spyder · « **Reactie #1 Gepost op:** 17 december 2004, 20:44:18 »

Hoi Startbaan,

De meest simpele oplossing zal toch zijn om dit manueel aan te passen. Het is maar 1 maal per jaar dat deze aangepast dienen te worden)

Ik denk dat het probleem vooral de feestdagen rond Pasen (Pasen, OLH hemelvaart, Pinksteren) zullen zijn. Ik weet niet op welke basis deze dagen bepaald worden.
Met de vaste feestdagen moet dit wellicht wel mogelijk zijn ( hoop ik toch), maar dan moet ik eerst toch eens kijken hoe het jaartal kan aangepast worden. (Wellicht in VBA?)

spyder

spyder · « **Reactie #2 Gepost op:** 17 december 2004, 21:44:54 »

Hoi Startbaan,

Ik heb nog eens wat huiswerk gedaan, en ben er bijna uit.

Alleen,................ het probleem blijft "Pasen".

Citaat

Pasen wordt gevierd op de eerste zondag na de eerste volle maan in de lente. Paaszondag valt ongeveer in het midden van de jaarlijkse paascyclus en bepaalt ook wanneer de andere kerkelijke feestdagen binnen deze cyclus vallen. Zo valt Aswoensdag, waarmee de carnavalsperiode wordt afgesloten, altijd 46 dagen vóór Pasen, Hemelvaartsdag altijd veertig dagen later, Pinksteren altijd op de 7e zondag na Pasen.

Hoe kan ik in Godsnaam in Excel gaan zeggen wanneer het "volle maan" is?

$:-\$ $:-\$ $:-\$
De andere datums is (bijna) geen probleem, die kunnen berekend worden.

Met de onderstaande macro voeg je 12 maanden toe aan de datumvelden.
Sub dateadd2()

Range("F9").Select
ActiveCell.FormulaR1C1 = "=ZELFDE.DAG(R[-7]C[-4],12)"
Range("F9").Select
Selection.NumberFormat = "dd mmmm yyyy"
Selection.AutoFill Destination:=Range("F9:F24"), Type:=xlFillDefault
Range("F9:F24").Select
End Sub

Ik experimenteerde nog een beetje met een andere functie (DateAdd) maar daar geraak ik voorlopig nog niet uit.

groetjes

azertyboy · « **Reactie #3 Gepost op:** 18 december 2004, 16:05:25 »

hoi ,het klinkt misschien vreemd maar Pasen valt op de eerste zondag na volle maan na het begin van de lente .
Misschien is het nu dan toch mogelijk een formuke op te stellen .

Schorpioen · « **Reactie #4 Gepost op:** 18 december 2004, 18:19:53 »

Kan dit helpen ?
Download "paasdata.xls" (gezipt).

spyder · « **Reactie #5 Gepost op:** 19 december 2004, 20:25:02 »

Hoi Schorpioen,

thnx, van de formule voor Pasen te berekenen snap ik op het eerste gezicht nog niet veel, maar dat excelbestandje komt van pas.

spyder

ceasar · « **Reactie #6 Gepost op:** 20 december 2004, 07:46:05 »

veel mensen content maken is geestig

kijk maar in de bijlage

ceasar · « **Reactie #7 Gepost op:** 20 december 2004, 07:51:07 »

ja, voor alles een tweede kans

Help!

Menu

Hulp bij posten

Zoeken

Recente topics