Discussion :

[Val2000]

Bonjour,
j'ai un souci bien embêtant avec un bout de code, un chargement d'une combobox d'un userform qui marche sans problème sur tous les ordinateurs, sauf sur deux!
Je charge une combobox avec les noms des mois (janvier, février, ...) à l'aide d'une boucle et un formattage mois.

Code :

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

1
2
3
For var = 1 To 12
    ImportForm.ComboBox1.AddItem Format("01/" & var & "/2014", "mmmm")
Next

Sur deux ordinateurs, cette boucle produit 12 fois janvier, janvier, ...
Quelqu'un aurait-il une idée? ce qui peut être à l'origine?

merci

[jfontaine]

Bonjour,

En format anglo-saxon les dates sont au format mm/dd/yyyy
Il est possible que ces 2 PC utilisent ce format et donc prennent le 01 du jour pour le mois

Pour éviter cela tu peux utiliser l'instruction MonthName

Code :

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

1
2
3
For var = 1To12    
     ImportForm.ComboBox1.AddItem MonthName(Var)
Next

[Val2000]

Merci beaucoup, c'est parfait.
C'était effectivement des ordinateurs en anglais et je ne le savais pas!