Fin de Mois

bonjour christophe,

Exitse-t-il une fonction similaire utilisable dans une
macro ?
pas à mon humble connaissance, mais tu peux faire :

finmois = DateSerial(Year(MaDate), Month(MaDate) + 1, 1) - 1

bon courage

Astérix

Tu peux utiliser la fonction en VBA ou la formule ci-dessous :
CDate(Year(Date) & "/" & Month(Date) + 1 & "/" & 1) - 1
ou Date peut-être remplacé par une autre date
--
HTH

Paul V.

Christophe wrote:

Bonjour,

il existe dans Excel une fonction EOMONTH qui donne la
date du dernier jour du mois a partir d'une date donnee.
Exitse-t-il une fonction similaire utilisable dans une
macro ?

Merci beaucoup.

il existe dans Excel une fonction EOMONTH qui donne la
date du dernier jour du mois a partir d'une date donnee.
Exitse-t-il une fonction similaire utilisable dans une
macro ?

Oui.... en activant la macro complémentaire "Utilitaire d'analyse - Vba"
Exemple : Connaître la dernière date du 3° mois après celui de la date de A1

Msgbox [eomonth(A1,3)]

Sans utilisation de la macro complémentaire :
x = 3
MsgBox DateSerial(Year([A1]), Month([A1]) + x + 1, 0) * 1

AV