bonjour,

j'essai de remplir 12 combobox avec les mêmes items.
j'ai essayé de la façon suivante :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
Dim comboaff As ComboBox
For Each comboaff In Me.Controls
    If InStr(comboaff.Name, "aff") <> 0 Then
        comboaff.AddItem (numerosaff.Cells(ligne, 4))
    End If
Next comboaff
mais cela plante sur la ligne "for each..." avec le message " incompatibilité de type".

quelqu'un aurait une idée ???