XL 2019 Formule avec date avant 1900.

[Paulle]

Bonjour,
Ce fichier vient d'une précédente discussion.

XL 2019 - Cellule en surbrillance suivant deux autres cellules.

Bonsoir, Si possible, je sélectionne une cellule en colonne "A" elle reste en surbrillance. Ensuite, je sélectionne une cellule en ligne "2" elle reste en surbrillance. Et la cellule à l'intersection devra se mettre en surbrillance. Exemple : A7 et H2 = H7. J'ai bien trouvé du code VBA, mais...

excel-downloads.com

Cela avait été résolu avec l'aide de plusieurs XLDnaute.
Mais j'ai ajouté des personnes et certaines sont nées avant 1900.
Et la formule renvoie une erreur. J'ai bien tenté d'ajouter 400 aux dates dans la formules, mais ce n'est toujours pas bon.
Parmi vous, quelqu'un a certainement la solution.

 

[JHA]

Bonjour à tous,

Avec un code de:

Comment calculer les âges avant le 1/1/1900 dans Excel - Office

Décrit comment utiliser Macro pour calculer l’âge avant le 1/1/1900 dans Excel.

learn.microsoft.com

JHA

 

[job75]

Bonjour Paulle,

J'ai bien tenté d'ajouter 400 aux dates dans la formules, mais ce n'est toujours pas bon.

Mais si c'est bon, voyez le fichier joint et la colonne auxiliaire D avec la formule en D5 :

=SI(ESTNUM(C5);MOIS.DECALER(C5;4800);DATEVAL(GAUCHE(C5;6)&DROITE(C5;4)+400))

Edit :salut JHA, pas rafraîchi.

A+

 

[Paulle]

Bonsoir JHA et job75,
Merci à vous deux.
Je vais garder la solution de job75 car cela est plus simple pour moi.
Mais je garde la macro de JHA pour un prochain besoin.

 

[job75]

Dans le fichier joint j'ai masqué la ligne 5 et la colonne D.

Et neutralisé la macro car elle est cafouilleuse.

 

[Paulle]

J'avais fait la même chose pour la ligne 5 et la colonne D.
Et chez moi, la macro fonctionne correctement.
Il y a juste quand je clique en C4, C2 se met en couleur.

 

[VIARD]

Bonjour @Paulle et à tous

Je n'est regardé ton classeur vue que tu étais entre de bonnes mains.
J'ai un fichier qui pourrait t'aider, c'est un mini calendrier.
capable de donner des durées (âge), mais il fait plus.
A+ Jean-Paul