Modification sur un tout petit code Résolu/Fermé

Question

Bonsoir a toutes et tous, Forum

Configuration: Windows 7 / Excel 2007

J'ai un UserForm et deux Combobox 2 et 3 qui affiche la mème chose tous les deux

j'affiche par le code ci-dessous les douze mois de l'année

je souhaiterai svp faire la mème chose MAIS afficher avec la première lettre
de chaque mois en majuscule dans les deux Combos.

Pas faute d'avoir essayer mais je n'ai pas réussi.


For I = 1 To 12
  Me.ComboBox2.AddItem MonthName(I)
  Me.ComboBox3.AddItem MonthName(I)
Next I


Je vous remercie pour votre temps et votre aide
Bon W-end a tous
Cdlt  Ray

Yoda · Answer

Bonjour,

For I = 1 To 12
  Me.ComboBox2.AddItem UCase(Left(MonthName(I), 1)) & Mid(MonthName(I), 2)
  Me.ComboBox3.AddItem UCase(Left(MonthName(I), 1)) & Mid(MonthName(I), 2)
Next I

;)

dudulleray · Answer

Bonjour Yoda, Forum bonjour

Je te remercie beaucoup de ton aide et pour le code, ca fonctionne très bien

En voyant ton code, j'étais pas loin lors de mes essais j'ai rater quelque chose

mais bon, ça marche bien, la est l'essentiel.

Je te souhaite un agréable W-end et encore merci de ta sympathie.

Résolu pour moi

Cordialement Raymond

Modification sur un tout petit code

2 réponses

Discussions similaires