Note: The other languages of the website are Google-translated. Back to English

Sut i gyfrifo dyddiad y Pasg yn Excel?

doc cyfrifo dyddiad pasg 1

Fel y gwyddom i gyd, gwyliau'r Pasg yw'r dydd Sul cyntaf bob amser sydd ar ôl y lleuad eglwysig gyntaf sy'n digwydd ar 21 Mawrth neu ar ôl hynny, felly gall dyddiad y Pasg bob blwyddyn fod yn ddyddiad gwahanol fel y dangosir y llun a ddangosir. I gael dyddiad penodol y Pasg mewn blwyddyn benodol, efallai y bydd yr erthygl hon yn ffafrio chi.

Cyfrifwch ddyddiad y Pasg o'r flwyddyn benodol gyda'r fformiwla

Cyfrifwch ddyddiad y Pasg o'r flwyddyn benodol gyda Swyddogaeth wedi'i Diffinio gan Ddefnyddiwr


swigen dde glas saeth Cyfrifwch ddyddiad y Pasg o'r flwyddyn benodol gyda'r fformiwla

I gael dyddiad y Pasg mewn blwyddyn benodol, gall y fformiwla ganlynol eich helpu chi, gwnewch fel a ganlyn:

1. Rhowch y fformiwla hon: =FLOOR("5/"&DAY(MINUTE(A2/38)/2+56)&"/"&A2,7)-34 i mewn i gell wag wrth ochr eich blwyddyn benodol, B2er enghraifft, gweler y screenshot:

doc cyfrifo dyddiad pasg 2

2. Yna llusgwch y handlen llenwi i lawr i'r celloedd rydych chi am gyfrifo dyddiad Pasg y dyddiad penodol, ac mae rhifau pum digid yn cael eu harddangos yn y celloedd, gweler y screenshot:

doc cyfrifo dyddiad pasg 3

3. Ac yna dylech fformatio'r rhifau fel fformat dyddiad:

(1.) Dewiswch y rhifau 5 digid a chliciwch ar y dde i ddewis Celloedd Fformat o'r ddewislen cyd-destun;

(2.) Yn y popped allan Celloedd Fformat blwch deialog, cliciwch Nifer tab, a dewis dyddiad oddi wrth y categori cwarel, yna dewiswch un fformat dyddiad yr ydych yn ei hoffi o'r blwch rhestr gywir, gweler y screenshot:

doc cyfrifo dyddiad pasg 4

4. Ac yna, mae'r rhifau wedi'u fformatio fel y fformat dyddiad yn ôl yr angen, a gallwch gael dyddiad Pasg y flwyddyn benodol, gweler y screenshot:

doc cyfrifo dyddiad pasg 5

Awgrymiadau: I fformatio'r rhifau i'ch fformat dyddiad arferol, gallwch hefyd ddefnyddio cyfleustodau Fformatio Dyddiad Gwneud Cais Kutools ar gyfer Excel fel y screenshot canlynol a ddangosir:

doc cyfrifo dyddiad pasg 6


swigen dde glas saeth Cyfrifwch ddyddiad y Pasg o'r flwyddyn benodol gyda Swyddogaeth wedi'i Diffinio gan Ddefnyddiwr

Mae'r canlynol Swyddogaeth Diffiniedig Defnyddiwr hefyd yn gallu eich helpu i gyfrifo dyddiad Pasg blwyddyn benodol.

1. Daliwch i lawr y ALT + F11 allweddi, yna mae'n agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Cliciwch Mewnosod > Modiwlau, a gludwch y cod canlynol yn y Modiwlau Ffenestr.

Cod VBA: Cyfrifwch ddyddiad y Pasg y flwyddyn benodol:

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. Yna arbed a chau'r cod hwn, ewch yn ôl i'r daflen waith a nodi'r fformiwla hon: = easterdate (A2) i mewn i gell wag wrth ochr eich data cyfatebol, ac yna llusgwch y ddolen llenwi i lawr i'r celloedd rydych chi am gymhwyso'r fformiwla hon, fe gewch chi rifau pum digid, gweler y screenshot:

doc cyfrifo dyddiad pasg 7

5. Ac yna dylech chi newid y rhifau hyd yn hyn yn ôl yr angen. Edrychwch ar gam3 o'r dull uchod i'w fformatio hyd yma.


Yr Offer Cynhyrchedd Swyddfa Gorau

Mae Kutools for Excel yn Datrys y rhan fwyaf o'ch Problemau, ac yn Cynyddu Eich Cynhyrchedd 80%

  • Ailddefnyddio: Mewnosod yn gyflym fformwlâu cymhleth, siartiau ac unrhyw beth rydych chi wedi'i ddefnyddio o'r blaen; Amgryptio Celloedd gyda chyfrinair; Creu Rhestr Bostio ac anfon e-byst ...
  • Bar Fformiwla Gwych (golygu llinellau lluosog o destun a fformiwla yn hawdd); Cynllun Darllen (darllen a golygu nifer fawr o gelloedd yn hawdd); Gludo i'r Ystod Hidlo...
  • Uno Celloedd / Rhesi / Colofnau heb golli Data; Cynnwys Celloedd Hollt; Cyfuno Rhesi / Colofnau Dyblyg... Atal Celloedd Dyblyg; Cymharwch y Meysydd...
  • Dewiswch Dyblyg neu Unigryw Rhesi; Dewiswch Blank Rows (mae pob cell yn wag); Darganfyddiad Gwych a Darganfyddiad Niwlog mewn Llawer o Lyfrau Gwaith; Dewis ar Hap ...
  • Copi Union Celloedd Lluosog heb newid cyfeirnod fformiwla; Auto Creu Cyfeiriadau i Daflenni Lluosog; Mewnosod Bwledi, Blychau Gwirio a mwy ...
  • Testun Detholiad, Ychwanegu Testun, Tynnu yn ôl Swydd, Tynnwch y Gofod; Creu ac Argraffu Subtotals Paging; Trosi rhwng Cynnwys a Sylwadau Celloedd...
  • Hidlo Super (arbed a chymhwyso cynlluniau hidlo i ddalenni eraill); Trefnu Uwch yn ôl mis / wythnos / dydd, amlder a mwy; Hidlo Arbennig gan feiddgar, italig ...
  • Cyfuno Llyfrau Gwaith a Thaflenni Gwaith; Uno Tablau yn seiliedig ar golofnau allweddol; Rhannwch Ddata yn Daflenni Lluosog; Trosi Swp xls, xlsx a PDF...
  • Mwy na 300 o nodweddion pwerus. Yn cefnogi Swyddfa / Excel 2007-2019 a 365. Yn cefnogi pob iaith. Defnydd hawdd yn eich menter neu sefydliad. Nodweddion llawn treial am ddim 30 diwrnod. Gwarant arian yn ôl 60 diwrnod.
tab kte 201905

Mae Tab Office yn Dod â rhyngwyneb Tabbed i'r Swyddfa, a Gwneud Eich Gwaith yn Haws o lawer

  • Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
  • Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
  • Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!
gwaelod officetab
sylwadau (11)
Dim sgôr eto. Byddwch y cyntaf i sgorio!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Cyfieithais eich fformiwla ar gyfer Iseldireg Excel fel hyn (blwyddyn yn A81):
=AFRONDEN.BENEDEN(DATUM(A81;5;DAG(MINUUT(A81/38)/2+56));7)-34

Mae'r fformiwla yn rhoi 2079-04-16 ar gyfer Pasg 2079. Dylai hyn fod yn 2079-04-23. Mae gweddill yr 21ain ganrif yn edrych yn iawn!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Ydw, rwyf wedi cael rhai problemau gydag amrywiadau ar y fformiwla honno. Gwiriwch 2011, 2038, 2052, a 2079, i gyd 7 diwrnod yn gynnar.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Hefyd mae 2108 yn rhoi 2108-Maw-31, dylai fod yn 2108-Ebrill-1.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Beth am y Pasg uniongred? A oes cod ar gyfer hynny hefyd?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
A oes Fformiwla Excel debyg i ddarganfod y Flwyddyn Newydd Tsieineaidd gan ei bod hefyd yn Ŵyl Calendr Lleuad?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae'n gweithio ar daflenni google. Mae'n hir iawn ond mae'n gweithio heb gamgymeriad am y blynyddoedd problemus hefyd (yr hyn a grybwyllwyd gennych yma). Gallwch gopïo i gell ac mewn cell K1 disgwylir y flwyddyn, fel 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))

Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo Tami, Diolch am eich cyfran. Mae'r fformiwla hon yn gweithio heb gamgymeriad ar daflenni google. Diolch! Yn gywir, Mandy
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae'n gweithio ar daflenni google. Mae'n hir iawn ond mae'n gweithio heb gamgymeriad am y blynyddoedd problemus hefyd (yr hyn a grybwyllwyd gennych yma). Gallwch gopïo i gell ac mewn cell K1 disgwylir y flwyddyn, fel 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))
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo hztamas,
Diolch am eich cyfran. Mae'r fformiwla hon yn gweithio heb gamgymeriad ar daflenni google. Diolch!
Yn gywir,
Mandy
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Fersiwn Excel, yn fwy syml, dim ond L3 sy'n rhaid i chi ei newid ar y dechrau i'r gell lle byddwch chi'n rhoi'r flwyddyn (fel 2022) i mewn. 
=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)))
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo hztamas, Diolch yn fawr am eich cyfran. Newidiais y ";" i "," yn eich fformiwla fel y gall weithio yn Excel. Mae gen i ddata (fel 2013) yng nghell 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,DYDDIAD(Y,3,H),DYDDIAD(Y,4,H-31))) Mae'r fformiwla hon yn gweithio, ond credaf nad yw'n llawer symlach na'r fformiwla yn yr erthygl. Beth bynnag, dwi'n meddwl bod y ddau ohonyn nhw'n wych. Diolch eto! Yn gywir, Mandy
Nid oes unrhyw sylwadau wedi'u postio yma eto
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir