Bonjour
J'ai un combobox et 8500 ligne a mettre dedans
dans l'ACTIVATE de ma Worksheet j'ai fais
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
  Dim j As Integer
 'Récupère les données de la colonne A...
  For j = 1 To Feuil22.Range("A1").CurrentRegion.Rows.Count
        ComboBox1 = Feuil22.Range("A" & j)
        '...et filtre les doublons
        If ComboBox1.ListIndex = -1 Then ComboBox1.AddItem Feuil22.Range("A" & j)
    Next j
Cela fonctionne parfaitement (normal 90% du scripte provient du cite www.developpez)
Cependant le chargement des données est long

Question : comment faire pour tous charger d'un coup et non plus ligne a ligne ?
D'avance merci