Bonjour à toutes et à tous, avec ce code, l'affichage est pour la date du mois se fait toujours par exemple (de août) au lieu d'août:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
 
ddate = now 'date actuelle
 
dmois = Month(ddate) 'Mois actuel
 
le mois de " & MonthName(dMois) & "
il y a t'il un moyen de déterminer le mois qui commence par (d') sans trop modifier le code ?

En vous remerciant.

@+,

cincap