dhiouf
XLDnaute Occasionnel
Bonjour à toute et à tous,
J’ai 3 formules pour calculer le nombre en années, mois et jours exacte entre deux dates. Mon problème je n’arrive pas à les rendre en code VBA.
Formule pour calculer les années : B1=ENT((datefin – datedébut +2)/365.25)
Code VBA :
Dim datefin As Date, datedébut As Date
datefin = textbox1.text
datedébut = textbox2.text
textbox3.text =INT((datefin – datedébut + 2)/365.25) ‘çà marche
Formule différence en mois, une fois les années soustraites :
B2=ENT(MOD(datefin – datedébut+2;365.25)/(365.25/12))
Code VBA : ?
Formule différence en jours, une fois les années et les mois soustraits :
B3=ENT(MOD((datefin-datedébut+2);(365.25/12)))
Code VBA : ?
Avez-vous une idée
Merci d’avance.
J’ai 3 formules pour calculer le nombre en années, mois et jours exacte entre deux dates. Mon problème je n’arrive pas à les rendre en code VBA.
Formule pour calculer les années : B1=ENT((datefin – datedébut +2)/365.25)
Code VBA :
Dim datefin As Date, datedébut As Date
datefin = textbox1.text
datedébut = textbox2.text
textbox3.text =INT((datefin – datedébut + 2)/365.25) ‘çà marche
Formule différence en mois, une fois les années soustraites :
B2=ENT(MOD(datefin – datedébut+2;365.25)/(365.25/12))
Code VBA : ?
Formule différence en jours, une fois les années et les mois soustraits :
B3=ENT(MOD((datefin-datedébut+2);(365.25/12)))
Code VBA : ?
Avez-vous une idée
Merci d’avance.
Dernière édition: