Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Passage en majuscules d'une date

2 réponses
Avatar
ericlbt
Bonjour,

Malgré mes recherches je n'ai toujours pas trouvé la solution à mon problème.

En "A1" j'ai une date au format "jj.mm.aaaa"
"A5" est une copie de "A1" mais au format "mmmm aaaa"
"A1" = 01.03.2009
"A5" = mars 2009

Je souhaite créer une macro pour obtenir : MARS 2009

Merci par avance pour votre aide.

2 réponses

Avatar
FFO
Salut à toi

Date en A1

Pour A5 à mettre en format texte tu peux utiliser ceci :

Range("A5") = UCase(Format(Range("A1"), "mmmm yyyy"))

D'une manière générale pour la cellule active (en format texte) tu peux
mettre :

ActiveCell = UCase(Format(Range("A1"), "mmmm yyyy"))

Celà devrait convenir
Dis moi !!!!!
Avatar
ericlbt
Merci FFO, c'est parfait.

"FFO" a écrit :

Salut à toi

Date en A1

Pour A5 à mettre en format texte tu peux utiliser ceci :

Range("A5") = UCase(Format(Range("A1"), "mmmm yyyy"))

D'une manière générale pour la cellule active (en format texte) tu peux
mettre :

ActiveCell = UCase(Format(Range("A1"), "mmmm yyyy"))

Celà devrait convenir
Dis moi !!!!!