Macro pour utiliser la formule fin de mois dans la version 2000 ou 2002

[Gabin60200]

Bonjour à tous,

Je recherche une macro pour pouvoir effectuer la formule fin de mois de la version 2007 dans une version antérieur telle que celle de 2000 ou 2002.

Savez-vous s'il en existe ou dois-je me coller au travail et créer cette macro ?

Merci de vos réponses

 

[JNP]

Re : Macro pour utiliser la formule fin de mois dans la version 2000 ou 2002

Bonsoir Gabin60200 et bienvenue 🙂,
Je pense que cette fonction

Function MaFinDeMois(MaDate As Date, Optional NbreMois As Integer = 0)
Application.Volatile
MaFinDeMois = DateAdd("m", 1 + NbreMois, CDate("01/" & Month(MaDate) & "/" & Year(MaDate))) - 1
End Function

devrais fonctionner sur du 2000 🙄...
Bonne soirée 😎

 

[Gabin60200]

Re : Macro pour utiliser la formule fin de mois dans la version 2000 ou 2002

Merci beaucoup JNP ! Je vais essayer de suite

Bonné soirée

 

[Staple1600]

Re : Macro pour utiliser la formule fin de mois dans la version 2000 ou 2002

Bonsoir à tous


Sans passer par une macro (et sans utiliser FIN.MOIS)
=DATE(ANNEE(A1);MOIS(A1)+1;0)
fonctionne même sur Excel 97

 

[Ronnie]

G E N I A L !!!!!
Je découvre cette solution 14 ans après... Qu'est ce que j'aurai pu m'économiser du travail en tapant chaque mois sur des fiches de suivi pendant des années et années !!! FIN.MOIS n'existe pas sur excel 2000.
Si vous êtes toujours là, Staple, Barbatruc, je vous remercie de tout mon coeur! Mes meilleurs voeux pour la vie, Ronald