Discussion :

[Paul Guille]

Bonjour à tous,

J'ai créé deux userform pour Outllok et dans chacun d'eux, il y a une liste déroulante. La première fonctionne impécablement mais pas moyen d'intégrer les valeurs dans la deuxième.



Quand je lance l'ouverture, la liste reste désespérément vide... je lance simplement Userfom2.show dans un module.

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
22
23
24
25
26
27
28
29
30
31
32
33
34
Private Sub Combobo2_Change()
 
End Sub
 
Private Sub CommandButton2_Click()
 
lstNum2 = ComboBox2.ListIndex
 
Unload Me
 
End Sub
 
Private Sub UserForm2_Initialize()
 
With ComboBox2
 
    .AddItem "Chantal"
    .AddItem "Christel"
    .AddItem "Chun"
    .AddItem "Isabelle"
    .AddItem "Patricia"
    .AddItem "Paul"
    .AddItem "Sabine"
    .AddItem "Stefan"
    .AddItem "V?ronique"
 
End With
 
End Sub
 
 
Private Sub UserForm_Click()
 
End Sub

[Oliv-]

Bonsoir,

l'événement doit s'appeler

Private Sub UserForm_Initialize() et non Private Sub UserForm2_Initialize()

[Paul Guille]

Je suis vraiment trop b...

Merci 1000 fois