Bonjour,
j'ai un petit problème dans l'userform et je vais essayer d' expliquer le nécessaire ci-dessous:
l'userform contient un ensemble de ComboBox et chaque ComboBox porté des données personnalisé le problème est quand il ya un nom en double le ComboBox il suffit d'insérer un seul nom bien que je veux inclure tous l'items.
Observation:
j'utilisé le code suivant pour personnaliser les données dans les ComboBox:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub UserForm_Initialize()
  Set ws = Sheets("Stocks")
  lrw = ws.Cells(Rows.Count, "B").End(xlUp).Row
  Ary = ws.Range("B12:B" & lrw).Value
ListCmb "Boitie", "ComboBox7"
ListCmb "Carte Mére", "ComboBox8"
ListCmb "Processeur", "ComboBox9"
ListCmb "Ventilateur", "ComboBox10"
ListCmb "Disque Dur", "ComboBox11"
ListCmb "Graveur", "ComboBox12"
ListCmb "Ram", "ComboBox13"
ListCmb "Carte graphique", "ComboBox14"
ListCmb "Ecran", "ComboBox15"
End Sub
aidez mois SVP