Format de mois

[belette]

Bonjour,

J'ai des mois de 1 à 12 (normal!) et je les voudrais de janvier à décembre.

J'utilise dans ma macro VBA l'instruction suivante :

Columns('D😀').NumberFormat = 'mmmm'

Mais du coup mon chiffre de 1 à 12 est interprété comme une date et pas juste un mois, comment y remédier ?

 

[Law]

Bonjour Belette, le forum,

Ceci pourrait t'aider :

Sub FormeDate()
Dim X As Byte
For X = 1 To 12
Sheets(1).Range('E' & X).FormulaR1C1 = '=TEXT(''1/''&RC[-1],''mmmm'')'
Next X
End Sub

Avec ce code, la macro fera en sorte de te mettre à droite de ta colonne D (donc colonne E) les noms des mois. Mais ça ne te remplaces pas directement tes numéros de mois dans la colonne D.
Toutefois rien ne t'empêche après de faire en VBA un couper coller des valeurs de la colonne E sur la colonne D.

Bonne journée,
Ciao ciao !! 😉

 

[belette]

Merci Law

Il n'y a pas plus plus simple ? Dommage, tant pis...

 

[henri]

Bonsoir,
une autre solution
A+ [file name=mois_20060602211247.zip size=6486]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/mois_20060602211247.zip[/file]

 

[henri]

Bonsoir,
j'ai oublié, tu tapes le n° du mois dans la colonne B et le mois apparait en lettre.
A +