Bonjour,

Je cherche à alimenter des combobox dans un formulaire en utilisant la méthode AddItem car le nombre d'entrée des combobox est variable.

J'utilise le code suivant pour faire cette manipulation :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
 
Private Sub Organ_Initialize()
 
JN_RN.Clear
 
numLigneDernierSalarie = Sheets("Data").Range("A" & Rows.Count).End(xlUp).Row
 
For i = 3 To numLigneDernierSalarie
    Organ.JN_RN.AddItem Replace(Sheets("Data").Range("A" & i).Value, " ", " ")
Next
 
 
End Sub
Par Contre, le combobox ne remonte aucune valeur.

Avez-vous une idée ?.

Merci !