Bonjour à tous,

A ma grande surprise, les valeurs de combobox ne se chargent plus !

J'ai essayé le code suivant dans un nouveau classeur et plus rien ne se passe ? (pas de mesaage erreur, le controle est vide) :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
Sub chargement()
 
UserForm1.Show
Me.ComboBox1.AddItem "Lundi"
Me.ComboBox1.AddItem "Mardi"
 
End Sub
 
 
 
Private Sub ComboBox1_Change()
 
With UserForm1.ComboBox1
.AddItem "val1"
.AddItem "val2"
.AddItem "val3"
End With
 
 
End Sub
Auriez-vous une solution ?

Un grand merci pour la réponse.