Microsoft 365 Convertir en Nombre de mois

PORCHER · 31 Août 2020

Bonjour,
Cela fait un moment que je recherche à convertir en VBA cette commande ;
NoLigne = Target.Row
D1 = Date de naissance
D2 = Date d'Aujourdhui

ActiveSheet.Cells(NoLigne, 6) = DATEDIF(D1;D2;"m")+(DATEDIF(D1;D2;"md")/JOUR(FIN.MOIS(D2;0)))

Merci de m'aider...
Cordialement

pierrejean · 31 Août 2020

Bonjour Porcher

VB:

ActiveSheet.Cells(Noligne, 6) = "= DATEDIF(D1,D2,""m"")+(DATEDIF(D1,D2,""md"")/DAY(EOMONTH(D2,0)))"

PORCHER · 31 Août 2020

Merci Pierrejean j'ai chercher sur le net et je n'ai pas trouvé de réponse comme celle ci
en ce qui me concerne je l'ai placé dans ma macro et fonctionne très bien.
Merci beaucoup

Microsoft 365 Convertir en Nombre de mois

PORCHER

XLDnaute Occasionnel

pierrejean

XLDnaute Barbatruc

PORCHER

XLDnaute Occasionnel

Discussions similaires