XL 2019 année bissextile

chinel

XLDnaute Impliqué
Bonjour tout le monde, j'ai dans une cellule une date (aujourd'hui) et jaurais voulu avoir dans une autre la mention (année bissextile ou non bissextile) vis-à-vis de l'autre cellule. Merci !
 
Solution
Bonjour,

Sur le lien donné par le camarade Deadpool_CC (merci à lui 👍), il y a cette formule :
Code:
=IF(OR(MOD(A1,400)=0,AND(MOD(A1,4)=0,MOD(A1,100)<>0)),"bissextile", "non bissextile")
A1 est ici la cellule qui contient l'année.
Si ta cellule A1 contient une date, il faut alors bien sûr remplacer tous les A1 de la formule par ANNEE(A1).

patricktoulon

XLDnaute Barbatruc
bonsoir
juste en passant
perso je rejoins @Jacky67
il est plus facile de tester 28 ou 29 jour sur le mis de février d'une année
sachant que la règle des 400 ou 4 et ou 100 n'est pas immuable à long terme (même si on sera plus là quand ça arrivera )

néanmoins je me simplifie la tache au niveau de la formule
comme son homologue vba dateserial avec date en formule j'utilise l'index jour "0" du mois suivant pour avoir le nombre de jour d'un mois
la formule devient tout de suite plus claire
exemple ici
=date(2023 ; 3 ; 0)
me donnera le 28/02/2023
donc 28 jours

donc la formule pour savoir serait
=SI(JOUR(DATE(ANNEE(A1);3;0))=29;"bissextile";"non bissextile")
si A1 n'est pas une date mais juste l'année
=SI(JOUR(DATE(A1;3;0))=29;"bissextile";"non bissextile")

juste pour info son homologue en vba
VB:
MsgBox Day(DateSerial(2023, 3, 0))
;) +
et meilleurs veux à tous
 

chinel

XLDnaute Impliqué
bonsoir
juste en passant
perso je rejoins @Jacky67
il est plus facile de tester 28 ou 29 jour sur le mis de février d'une année
sachant que la règle des 400 ou 4 et ou 100 n'est pas immuable à long terme (même si on sera plus là quand ça arrivera )

néanmoins je me simplifie la tache au niveau de la formule
comme son homologue vba dateserial avec date en formule j'utilise l'index jour "0" du mois suivant pour avoir le nombre de jour d'un mois
la formule devient tout de suite plus claire
exemple ici
=date(2023 ; 3 ; 0)
me donnera le 28/02/2023
donc 28 jours

donc la formule pour savoir serait

si A1 n'est pas une date mais juste l'année


juste pour info son homologue en vba
VB:
MsgBox Day(DateSerial(2023, 3, 0))
;) +
et meilleurs veux à tous
Merci pour ces explications et voeux aussi. Bonne journée
 

Discussions similaires

Réponses
11
Affichages
470

Statistiques des forums

Discussions
312 207
Messages
2 086 228
Membres
103 160
dernier inscrit
Torto