Problème Month(Date)

[Claudy]

Bonjour à tous,
Format(Month(Date), "mmmm") me retourne January!

Avez vous une explication?
merci d'avance,
Claudy

 

[CB60]

Re : Problème Month(Date)

Bonjour
Essai cela :

=TEXTE(DATE(ANNEE(AUJOURDHUI());MOIS(AUJOURDHUI());JOUR(AUJOURDHUI()));"mmmm")
OU
=PROPER(TEXT(DATE(YEAR(TODAY());MONTH(TODAY());DAY(TODAY()));"mmmm"))

 

[dominique35]

Re : Problème Month(Date)

bonjour

Pas très clair un peu plus de détails serais les bienvenues, avec un fichier joint encore mieux

pour la recherche du mois:

Sub ChercheMois()

Dim LaDate As Date, Lannee As Long
Dim LeMois As Variant, LeJour As Variant

LaDate = Date
Lannee = Year(LaDate)
LeMois = Month(LaDate)
LeJour = Day(LaDate)

LeMois = MonthName(Month(LaDate))
LeJour = WeekdayName(Weekday(LaDate))

MsgBox LeMois & vbCrLf & LeJour

End Sub

 

[Claudy]

Re : Problème Month(Date)

Merci,
mais je suis en VBA....et j'ai essayé d'adapter avec Application.WorksheetFunction.Proper, mais je pédale dans la choucroute!
a+
claudy

 

[Claudy]

Re : Problème Month(Date)

Merci Dominique35,
Si le problème était simple:
Format(Month(Date), "mmmm") me retourne January...
Mais grâce à ta chtite macro, que j'ai adapté à mes besoins, (Je ne connaissais pas l'existence de la fonction MonthName)
C'est nickel maintenant, bonne journée,
Claudy

 

[dominique35]

Re : Problème Month(Date)

Merci
Et bonne journée à toi et au forum