Բաց թողնել հիմնական բովանդակությունը

Ինչպե՞ս հաշվարկել Easterատկի ամսաթիվը Excel- ում:

Հեղինակ՝ Սյաոյանգ Վերջին փոփոխությունը՝ 2020-07-17
փաստաթուղթը հաշվարկի easատկի ամսաթիվը 1

Ինչպես բոլորս գիտենք, Easterատկի տոնը միշտ առաջին կիրակն է, որը տեղի է ունենում առաջին եկեղեցական լիալուսնից հետո, որը տեղի է ունենում մարտի 21-ին կամ դրանից հետո, ուստի յուրաքանչյուր տարվա Easterատկի ամսաթիվը կարող է լինել տարբեր ամսաթվով, ինչպես ցույց է տրված նկարում: Տվյալ տարվա Easterատկի կոնկրետ ամսաթիվը ստանալու համար այս հոդվածը կարող է ձեզ լավություն բերել:

Տրված տարվա Easterատկի ամսաթիվը հաշվարկեք բանաձևով

Հաշվեք տվյալ տարվա Easterատկի ամսաթիվը ՝ օգտագործողի կողմից սահմանված գործառույթով

նետ կապույտ աջ պղպջակ Տրված տարվա Easterատկի ամսաթիվը հաշվարկեք բանաձևով

Տրված տարվա Easterատկի ամսաթիվը ստանալու համար հետևյալ բանաձևը կարող է օգնել ձեզ, խնդրում ենք անել հետևյալը.

1, Մուտքագրեք այս բանաձևը. =FLOOR("5/"&DAY(MINUTE(A2/38)/2+56)&"/"&A2,7)-34 ձեր տվյալ տարվա կողքին գտնվող դատարկ բջիջը B2, օրինակ, տես նկարի նկարը.

փաստաթուղթը հաշվարկի easատկի ամսաթիվը 2

2, Ապա լրացրեք բռնիչը ներքև քաշեք դեպի այն բջիջները, որոնք ցանկանում եք հաշվարկել տվյալ ամսաթվի Easterատկի ամսաթիվը, և հնգանիշ թվերը ցուցադրվում են բջիջներում, տե՛ս նկարը.

փաստաթուղթը հաշվարկի easատկի ամսաթիվը 3

3, Եվ ապա դուք պետք է ձևաչափեք նրա թվերը որպես ամսաթվի ձևաչափ.

(1.) Ընտրեք 5 նիշանոց համարները և աջ կտտացրեք ընտրելու համար Ձևաչափել բջիջները համատեքստային ընտրացանկից;

(2.) Դուրս եկավ Ձևաչափել բջիջները երկխոսության վանդակում, սեղմեք Թիվ էջանշանը եւ ընտրել Ամսաթիվ - ից կատեգորիա պատուհանից, այնուհետև աջ ցուցակի տուփից ընտրեք ձեզ դուր եկած մեկ ամսաթվերի ձևաչափը, տեսեք ՝

փաստաթուղթը հաշվարկի easատկի ամսաթիվը 4

4, Եվ ապա, համարները ձևափոխվել են որպես ամսաթվի ձևաչափ, որքան ձեզ հարկավոր է, և դուք կարող եք ստանալ տվյալ տարվա Easterատկի ամսաթիվը, տե՛ս նկարը.

փաստաթուղթը հաշվարկի easատկի ամսաթիվը 5

Tips: Թվերը ձեր սովորական օգտագործված ամսաթվով ձևաչափելու համար կարող եք նաև օգտագործել Excel- ի համար կիրառել Kutools ամսաթվի ձևավորման ձևաչափը, ինչպես ցույց է տրված հետևյալ նկարը

փաստաթուղթը հաշվարկի easատկի ամսաթիվը 6

նետ կապույտ աջ պղպջակ Հաշվեք տվյալ տարվա Easterատկի ամսաթիվը ՝ օգտագործողի կողմից սահմանված գործառույթով

Հետեւյալ Օգտագործողի սահմանած գործառույթը նաև կարող է օգնել ձեզ հաշվարկել որոշակի տարվա Easterատկի ամսաթիվը:

1, Պահեք պահեք ALT + F11 ստեղները, ապա այն բացում է Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներ, և տեղադրեք հետևյալ կոդը Մոդուլներ Պատուհանը:

VBA կոդ. Հաշվեք տվյալ տարվա Easterատկի ամսաթիվը.

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, Ապա պահեք և փակեք այս կոդը, վերադառնաք աշխատանքային թերթ և մուտքագրեք այս բանաձևը. = terատիկ (A2) ձեր համապատասխան տվյալների կողքին գտնվող դատարկ բջիջի մեջ և այնուհետև լրացնելու բռնիչը ներքև քաշեք դեպի այն բջիջները, որոնք ցանկանում եք կիրառել այս բանաձևը, կստանաք հնգանիշ թվեր, տես նկարի նկարը.

փաստաթուղթը հաշվարկի easատկի ամսաթիվը 7

5, Եվ ապա դուք պետք է փոխեք համարները մինչև օրվա ձևաչափը, որքան ձեզ հարկավոր է: Խնդրում ենք դիտել վերը նշված մեթոդի 3-րդ մասը `դրանք մինչ օրս ձևաչափելու համար.

Գրասենյակի արտադրողականության լավագույն գործիքները

🤖 Kutools AI օգնականՀեղափոխություն կատարել տվյալների վերլուծության հիման վրա՝ Խելացի կատարում   |  Ստեղծեք ծածկագիր  |  Ստեղծեք հատուկ բանաձևեր  |  Վերլուծել տվյալները և ստեղծել գծապատկերներ  |  Invoke Kutools-ի գործառույթները...
Հանրաճանաչ հատկություններ: Գտեք, ընդգծեք կամ նույնականացրեք կրկնօրինակները   |  Deleteնջել դատարկ շարքերը   |  Միավորել սյունակները կամ բջիջները՝ առանց տվյալների կորստի   |   Կլոր առանց բանաձևի ...
Super Փնտրել: Բազմաթիվ չափանիշների VLookup  |   Բազմակի արժեք VLookup  |   VLookup բազմաթիվ թերթերում   |   Fuzzy Փնտրել ....
Ընդլայնված բացվող ցուցակ: Արագ ստեղծեք բացվող ցուցակը   |  Կախված բացվող ցուցակ   |  Բազմակի ընտրություն Drop Down ցուցակ ....
Սյունակի կառավարիչ: Ավելացրեք որոշակի քանակությամբ սյունակներ  |  Տեղափոխել սյունակները  |  Փոխարկել թաքնված սյունակների տեսանելիության կարգավիճակը  |  Համեմատեք միջակայքերը և սյունակները ...
Առանձնահատկություններ: Ցանցի կենտրոնացում   |  Դիզայնի տեսք   |   Մեծ Formula Bar   |  Աշխատանքային գրքույկի և թերթիկների կառավարիչ   |  Ռեսուրսների գրադարան (Ավտոմատ տեքստ)   |  Ամսաթիվ ընտրող   |  Միավորել աշխատանքային թերթերը   |  Գաղտնագրել/գաղտնազերծել բջիջները   |  Ուղարկեք նամակներ ըստ ցանկի   |  Սուպեր զտիչ   |   Հատուկ զտիչ (զտել թավ/շեղ/շեղված...) ...
Լավագույն 15 գործիքների հավաքածու:  12 Տեքստ Գործիքներ (Ավելացրեք տեքստ, Հեռացնել նիշերը, ...)   |   50+ Աղյուսակ Տեսակներ (Գանտի աղյուսակը, ...)   |   40+ Գործնական Բանաձեւեր (Հաշվարկել տարիքը ՝ ելնելով ծննդյան տարեդարձից, ...)   |   19 միացում Գործիքներ (Տեղադրեք QR կոդ, Տեղադրեք նկար ուղուց, ...)   |   12 Փոխարկում Գործիքներ (Բառեր համարներ, Արտարժույթի փոխակերպումը, ...)   |   7 Միաձուլում և պառակտում Գործիքներ (Ընդլայնված կոմբինատ տողեր, Պառակտված բջիջներ, ...)   |   ... եւ ավելին

Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար:  Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...

Նկարագրություն

Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք

  • Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
  • Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
  • Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:
Comments (11)
No ratings yet. Be the first to rate!
hztamas
hztamas
This comment was minimized by the moderator on the site
Excel verison, more simple, you only have to change L3 at the beginning to the cell where you will put the year (like 2022) in. 
=LET(Y;L3;A;MOD(Y;19);B;MOD(Y;4);C;MOD(Y;7);D;MOD(19*A+24;30);E;MOD(2*B+4*C+6*D+5;7);H;IFS(AND(E=6;D=29);50;AND(E=6;D=28;A>10);49;TRUE;22+D+E);IF(H<=31;DATE(Y;3;H);DATE(Y;4;H-31)))
Reply
Report
0
0
MandyZhou
MandyZhou     hztamas
This comment was minimized by the moderator on the site
Hello hztamas, Thank you a lot for your share. I changed the ";" to "," in your formula so it can work in Excel. I have data (like 2013) in cell A1.=LET(Y,A1,A,MOD(Y,19),B,MOD(Y,4),C,MOD(Y,7),D,MOD(19*A+24,30),E,MOD(2*B+4*C+6*D+5,7),H,IFS(AND(E=6,D=29),50,AND(E=6,D=28,A>10),49,TRUE,22+D+E),IF(H<=31,DATE(Y,3,H),DATE(Y,4,H-31)))This formula works, but I think it is not so much simpler than the formula in the article. Anyway, I think they are both great. Thanks again!Sincerely,Mandy
Reply
Report
0
0
hztamas
hztamas
This comment was minimized by the moderator on the site
It works on google sheets. It is very long but works without error for the problematic years too (what you mentioned here). You can copy to a cell and in K1 cell the year is expected, like 2022

=DATE(K1;IF((IFS(AND(MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7)=6;MOD(19*MOD(K1;19)+24;30)=29);50;AND(MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7)=6;MOD(19*MOD(K1;19)+24;30)=28;MOD(K1;19)>10);50;TRUE;22+MOD(19*MOD(K1;19)+24;30)+MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7)))<=31;3;4);IF((IFS(AND(MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7)=6;MOD(19*MOD(K1;19)+24;30)=29);50;AND(MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7)=6;MOD(19*MOD(K1;19)+24;30)=28;MOD(K1;19)>10);50;TRUE;22+MOD(19*MOD(K1;19)+24;30)+MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7)))<=31;IFS(AND(MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7)=6;MOD(19*MOD(K1;19)+24;30)=29);50;AND(MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7)=6;MOD(19*MOD(K1;19)+24;30)=28;MOD(K1;19)>10);49;TRUE;22+MOD(19*MOD(K1;19)+24;30)+MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7));(IFS(AND(MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7)=6;MOD(19*MOD(K1;19)+24;30)=29);50;AND(MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7)=6;MOD(19*MOD(K1;19)+24;30)=28;MOD(K1;19)>10);49;TRUE;22+MOD(19*MOD(K1;19)+24;30)+MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7)))-31))
Reply
Report
0
0
MandyZhou
MandyZhou     hztamas
This comment was minimized by the moderator on the site
Hello hztamas,
Thanks for your share. This formula does work without error on google sheets. Thanks!
Sincerely,
Mandy
Reply
Report
0
0
Tami
Tami
This comment was minimized by the moderator on the site
It works on google sheets. It is very long but works without error for the problematic years too (what you mentioned here). You can copy to a cell and in K1 cell the year is expected, like 2022
=DATE(K1;IF((IFS(AND(MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7)=6;MOD(19*MOD(K1;19)+24;30)=29);50;AND(MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7)=6;MOD(19*MOD(K1;19)+24;30)=28;MOD(K1;19)>10);50;TRUE;22+MOD(19*MOD(K1;19)+24;30)+MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7)))<=31;3;4);IF((IFS(AND(MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7)=6;MOD(19*MOD(K1;19)+24;30)=29);50;AND(MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7)=6;MOD(19*MOD(K1;19)+24;30)=28;MOD(K1;19)>10);50;TRUE;22+MOD(19*MOD(K1;19)+24;30)+MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7)))<=31;IFS(AND(MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7)=6;MOD(19*MOD(K1;19)+24;30)=29);50;AND(MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7)=6;MOD(19*MOD(K1;19)+24;30)=28;MOD(K1;19)>10);49;TRUE;22+MOD(19*MOD(K1;19)+24;30)+MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7));(IFS(AND(MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7)=6;MOD(19*MOD(K1;19)+24;30)=29);50;AND(MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7)=6;MOD(19*MOD(K1;19)+24;30)=28;MOD(K1;19)>10);49;TRUE;22+MOD(19*MOD(K1;19)+24;30)+MOD(2*MOD(K1;4)+4*MOD(K1;7)+6*MOD(19*MOD(K1;19)+24;30)+5;7)))-31))

Reply
0
0
MandyZhou
MandyZhou     Tami
This comment was minimized by the moderator on the site
Hello Tami,Thanks for your share. This formula does work without error on google sheets. Thanks!Sincerely,Mandy
Reply
Report
0
0
Lawrence
Lawrence
This comment was minimized by the moderator on the site
Is there a similar Excel Formula to figure out the Chinese New Year since it's also a Lunar Calendar Holiday?
Reply
0
0
What about orthodox
What about orthodox
This comment was minimized by the moderator on the site
What about orthodox easter? Is there a code for that as well?
Reply
0
0
Robbie G
Robbie G
This comment was minimized by the moderator on the site
Also 2108 gives 2108-Mar-31, should be 2108-Apr-1.
Reply
0
0
Paul
Paul
This comment was minimized by the moderator on the site
I translated your formula for Dutch Excel like this (year in A81):
=AFRONDEN.BENEDEN(DATUM(A81;5;DAG(MINUUT(A81/38)/2+56));7)-34

The formula gives 2079-04-16 for Easter 2079. This should be 2079-04-23. The rest of the 21st century looks ok!
Reply
0
0
Paul
Paul     Paul
This comment was minimized by the moderator on the site
Yes I've had some problems with variations on that formula. Check 2011, 2038, 2052, and 2079, all 7 days early.
Reply
0
0
There are no comments posted here yet
Please leave your comments in English
Guest
Posting as Guest
×
Rate this post:
Reset
0   Characters
Suggested Locations