Comment calculer la date de Pâques dans Excel ?

Comme nous le savons tous, le jour de Pâques est toujours le premier dimanche après la première pleine lune ecclésiastique qui se produit le 21 mars ou après. Par conséquent, la date de Pâques peut varier chaque année, comme le montre la capture d'écran suivante. Pour obtenir la date précise de Pâques pour une année donnée, cet article peut vous aider.

Calculer la date de Pâques d'une année donnée avec une formule

Calculer la date de Pâques d'une année donnée avec une fonction définie par l'utilisateur

Calculer la date de Pâques d'une année donnée avec une formule

Pour obtenir la date de Pâques d'une année donnée, la formule suivante peut vous aider. Veuillez procéder comme suit :

1. Entrez cette formule : =FLOOR("5/"&JOUR(MINUTE(A2/38)/2+56)&"/"&A2,7)-34 dans une cellule vide à côté de votre année donnée, B2 par exemple, voir la capture d'écran :

2. Ensuite, faites glisser la poignée de recopie vers le bas jusqu'aux cellules où vous souhaitez calculer la date de Pâques de l'année donnée, et des nombres à cinq chiffres s'affichent dans les cellules, voir la capture d'écran :

3. Ensuite, vous devez formater ces nombres au format date :

(1.) Sélectionnez les nombres à cinq chiffres, faites un clic droit et choisissez Formater les cellules dans le menu contextuel ;

(2.) Dans la fenêtre de dialogue Formater les cellules qui apparaît, cliquez sur l'onglet Nombre, puis sélectionnez Date dans le volet Catégorie, et choisissez ensuite un format de date que vous préférez dans la liste de droite, voir la capture d'écran :

4. Les nombres sont alors formatés selon le format de date dont vous avez besoin, et vous pouvez obtenir la date de Pâques pour l'année donnée, voir la capture d'écran :

Calculer la date de Pâques d'une année donnée avec une fonction définie par l'utilisateur

La fonction définie par l'utilisateur suivante peut également vous aider à calculer la date de Pâques pour une année spécifique.

1. Maintenez les touches ALT + F11 enfoncées, puis la fenêtre Microsoft Visual Basic pour Applications s'ouvre.

2. Cliquez sur Insertion > Module, puis collez le code suivant dans la fenêtre du module.

Code VBA : Calculer la date de Pâques d'une année donnée :

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. Ensuite, enregistrez et fermez ce code, revenez à la feuille de calcul et entrez cette formule : =easterdate(A2) dans une cellule vide à côté de vos données correspondantes, puis faites glisser la poignée de recopie vers le bas jusqu'aux cellules où vous souhaitez appliquer cette formule, vous obtiendrez des nombres à cinq chiffres, voir la capture d'écran :

5. Ensuite, vous devez convertir les nombres au format date dont vous avez besoin. Veuillez consulter l'étape 3 de la méthode ci-dessus pour les formater en date.