Microsoft 365 La date dans l'entête par VBA

natorp · 5 Décembre 2023

Bonjour à toutes et tous

J'ai un souci avec l'écriture du format date en VBA

Quand j'écris : .LeftHeader = "&""Arial,Gras""FACTURATION - " & Month(Now()) & " " & Year(Now()) 'cela me donne bien 12

Quand j'écris : .LeftHeader = "&""Arial,Gras""FACTURATION - " & UCase(Format(Month(Now()), "mmmm")) & " " & Year(Now()) 'cela me donne JANVIER

Merci pour votre aide et attention, cordialement, Gérard

Dranreb · 5 Décembre 2023

Bonjour.
Mettez

Code:

 .LeftHeader = "&""Arial,Gras""FACTURATION - " & UCase(Format(Date), "mmmm yyyy"))

Pris en tant que dates, les valeurs de 1 à 12 telles que Month(Date) vont du 1//1/1900 au 12/1/1900
ce qui est en effet toujours en janvier 1900.

natorp · 5 Décembre 2023

Merci Bernard

Petite correction :

VB:

.LeftHeader = "&""Arial,Gras""FACTURATION - " & UCase(Format(Date, "mmmm yyyy"))

Bonne journée, Gérard

Microsoft 365 La date dans l'entête par VBA

natorp

XLDnaute Barbatruc

Pièces jointes

Dranreb

XLDnaute Barbatruc

natorp

XLDnaute Barbatruc

Discussions similaires

Microsoft 365 La date dans l'entête par VBA

natorp

XLDnaute Barbatruc

Pièces jointes

Dranreb

XLDnaute Barbatruc

natorp

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency