Kako izračunati velikonočni datum v Excelu?
Kot že vsi vemo, so velikonočni prazniki vedno prva nedelja, ki je po prvi cerkveni polni luni, ki se zgodi 21. marca ali po njem, zato je lahko velikonočni datum vsakega leta drugačen kot na spodnjem posnetku zaslona. Če želite natančno določiti datum velikega leta v določenem letu, vam lahko ta članek naredi uslugo.
Izračunajte velikonočni datum določenega leta s formulo
Izračunajte velikonočni datum določenega leta z uporabniško določeno funkcijo
Izračunajte velikonočni datum določenega leta s formulo
Če želite dobiti velikonočni datum določenega leta, vam lahko pomaga naslednja formula, naredite naslednje:
1. Vnesite to formulo: =FLOOR("5/"&DAY(MINUTE(A2/38)/2+56)&"/"&A2,7)-34 v prazno celico poleg vašega leta, B2, na primer, glej posnetek zaslona:
2. Nato povlecite ročico za polnjenje navzdol do celic, za katere želite izračunati velikonočni datum določenega datuma, v celicah pa se prikažejo petmestne številke, glejte posnetek zaslona:
3. Nato morate številke oblikovati kot obliko datuma:
(1.) Izberite petmestne številke in z desno miškino tipko izberite Oblikuj celice iz kontekstnega menija;
(2.) V izstreljenem Oblikuj celice pogovorno okno, kliknite Število zavihek in izberite Datum Iz Kategorija v desnem seznamu izberite želeno obliko datuma, glejte posnetek zaslona:
4. Nato so številke oblikovane kot oblika datuma, kot jo potrebujete, in dobite lahko velikonočni datum določenega leta, glejte posnetek zaslona:
nasveti: Če želite številke formatirati v običajno uporabljeno obliko datuma, lahko uporabite tudi pripomoček Uporabi oblikovanje datuma v Kutools za Excel, kot je prikazano na sliki spodaj: |
Izračunajte velikonočni datum določenega leta z uporabniško določeno funkcijo
Naslednja Uporabniško določena funkcija vam lahko pomaga tudi pri izračunu velikonočnega datuma določenega leta.
1. Držite tipko ALT + F11 tipke, nato odpre Microsoft Visual Basic za aplikacije okno.
2. Kliknite Vstavi > Moduliin prilepite naslednjo kodo v Moduli Okno.
Koda VBA: Izračunajte velikonočni datum določenega leta:
Public Function EasterDate(Yr As Integer) As Date
'Updateby Extendoffice 20160530
Dim x As Integer
x = (((255 - 11 * (Yr Mod 19)) - 21) Mod 30) + 21
EasterDate = DateSerial(Yr, 3, 1) + x + (x > 48) + 6 - ((Yr + Yr \ 4 + _
x + (x > 48) + 1) Mod 7)
End Function
3. Nato shranite in zaprite to kodo, se vrnite na delovni list in vnesite to formulo: = velikonočni datum (A2) v prazno celico poleg ustreznih podatkov in nato povlecite ročico za polnjenje navzdol do celic, za katere želite uporabiti to formulo, dobili boste nekaj petmestnih številk, glejte posnetek zaslona:
5. Nato spremenite številke v obliko zapisa datuma, kot jih potrebujete. Prosimo, oglejte si korak 3 zgornje metode, da jih formatirate do danes.
Najboljša pisarniška orodja za produktivnost
Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa. Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...
Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo
- Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
- Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
- Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!