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 :
Astuce : Pour formater les nombres en utilisant votre format de date habituel, vous pouvez également utiliser l'utilitaire Appliquer le format de date de Kutools pour Excel, comme le montre la capture d'écran suivante :
|
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 Function3. 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.
Meilleurs outils de productivité pour Office
Améliorez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité incomparable. Kutools pour Excel propose plus de300 fonctionnalités avancées pour booster votre productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte l’interface par onglets à Office, simplifiant considérablement votre travail.
- Activez la modification et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de50 % et réduit des centaines de clics de souris chaque jour !
Tous les modules complémentaires Kutools. Une seule installation
La suite Kutools for Office regroupe les modules complémentaires pour Excel, Word, Outlook & PowerPoint ainsi qu’Office Tab Pro, idéal pour les équipes travaillant sur plusieurs applications Office.
- Suite tout-en-un — modules complémentaires Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Un installateur, une licence — installation en quelques minutes (compatible MSI)
- Une synergie optimale — productivité accélérée sur l’ensemble des applications Office
- Essai complet30 jours — sans inscription, ni carte bancaire
- Meilleure valeur — économisez par rapport à l’achat d’add-ins individuels