Wyznaczanie daty Wielkanocy

W Excelu jest fajna funkcja o nazwie DNI.ROBOCZE. Ta funkcja oblicza, ile jest dni roboczych pomiędzy dwiema datami (dzięki temu można obliczyć np. pensje pracowników, którym się wypłaca „dniówki”). Jednak ta funkcja ma pewne wady: zlicza ona dni powszednie (od poniedziałku do piątku) pomiędzy dwiema datami. Nie są uwzględniane święta.

Na szczęście funkcja DNI.ROBOCZE posiada trzeci argument, który jest tablicą zawierającą święta (trzeba np. w osobnym arkuszu „w słupku” wypisać wszystkie święta, które wypadają w danym zakresie). Pewne święta zawsze wypadają tego samego dnia np. Nowy Rok zawsze wypada 1 stycznia, więc tutaj można użyć funkcji DATA(2019;1;1) itp. Jednak są takie święta jak Wielkanoc. Excel nie posiada funkcji, która oblicza datę Wielkanocy, ale od czego są makra.

Po zapoznaniu się z algorytmem Meeusa/Jonesa/Butchera napisałem prostą funkcję w VBA, która oblicza datę Wielkanocy. Oprócz tego dla osób, które nie mogą używać makr „przeklepałem” ten algorytm w postaci prostych formuł w osobnym arkuszu.

Znając datę Wielkanocy można też obliczyć inne święta. Jeśli do daty Wielkanocy dodamy 49, to otrzymamy Zielone Świątki, z kolei dodając 60 otrzymamy Boże Ciało.

Pobierz makro obliczające datę Wielkanocy

Ten wpis został opublikowany w kategorii sztuczki i oznaczony tagami , , , , . Dodaj zakładkę do bezpośredniego odnośnika.

Dodaj komentarz

Twój adres email nie zostanie opublikowany. Pola, których wypełnienie jest wymagane, są oznaczone symbolem *

This site uses Akismet to reduce spam. Learn how your comment data is processed.