Discussion :

[Invité]

Bonjour Le Forum,

Après avoir consulté pas mal de discussions sur le sujet, je n'ai pas trouvé ou n'ai pas compris les différents codes pour obtenir ce que je souhaite.

Je voudrais afficher dans une cellule une date avec un format particulier (mois avec 3 lettres et année 4 chiffres).
Par exemple pour le 11/12/2013, Déc.-2013, j'ai obtenu déc.-2013
mais je ne parviens pas à mettre la 1ère lettre en majuscule.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets("A").Range("I1") =Format(Sheets("B").Range("C2"), "mmm yyyy"))

J'ai essayé avec la fonction nompropre (Application.proper) mais ça ne donne rien.

Je vous remercie pour votre aide.

Cordialement,

[Daniel.C]

Bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Sheets("A").Range("I1").NumberFormat = "@"
Sheets("A").Range("I1") = Application.Proper(Format(Sheets("B").Range("C2"), "mmm yyyy"))

Note que le résultat n'est pas une date mais du texte.

[Invité]

Bonjour Daniel.C,

Je te remercie beaucoup pour ta réponse. c'est ce que je voulais, même si c'est du texte. Car c'est juste pour l'édition. Je n'avais pas pensé à une conversion intermédiaire. Encore merci.

Bonne journée.

Cordialement,