Discussion :

[reinruof77700]

bonjour le forum

voila j'ai un combobox 5 qui récupère les données dans mon classeur excel mais la je coince le combobox recupere les données dans la colone A au lieu de la B .

pouvez vous me dire ou est mon erreur ????

Merci de votre aide

Je vous joint mon fichier (ça peut aider )

[jijie]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Sub Init_CBB()
Dim J As Long, Nbligne As Long
 
  Me.ComboBox5.Clear
  With Sheets("synthèse")
    ' Determine le nombre de cellules remplies en colonne B
    Nbligne = .Cells(Columns(1).Cells.Count, 1).End(xlUp).Row
    For J = 3 To Nbligne                  'Boucle sur les lignes partir de la 2ème (si pas de titre changer en 1)
      ComboBox5.AddItem .Cells(J, 2).Value
    Next J
  End With
  End Sub

et maintenant?

[patricktoulon]

Bonjour
Ou peut etre ceci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Sub Init_CBB()
   With Sheets("synthèse")
   Me.ComboBox5.Clear
   tablo = Range("B3:B" & .Cells(rows.count, 1).End(xlUp).Row)
   ComboBox5.List() = tablo
   End With
End Sub