Discussion :

[chikitin]

Bonjour,
Cette fois il me faut remplir le ComboBox avec les lignes qui sont dans la colonne A du classeur. Est-ce qu'il y une limite au niveau nombre de lignes? C'est à dire, si j'ai 10 ou 150 lignes? car le classeur change........mais le UserForm sera utilisé pour n'importe quel Classeur.....Est-ce possible et comment?

[Fvandermeulen]

Salut,

J'ai considéré ta combobox dans un userform mais j'ai pas bien compris le coup de n'importe quel classeur...Tu veux récupérer les infos de la colonne A d'une feuille d'un autre classeur ?

Quoi qu'il en soit, voici le principe pour récupérer les données de la colonne A jusqu'à la dernière ligne remplie de la feuille active.

Code :

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

1
2
3
4
5
6
7
8
9
Private Sub UserForm_Initialize()
Dim NbLigne As Long, R As Long
 
NbLigne = ActiveSheet.Cells(Columns(1).Cells.Count, 1).End(xlUp).Row
 
For R = 2 To NbLigne
    UserForm.ComboBox.AddItem ActiveSheet.Cells(R, 1).Value
Next R
End Sub

A+

[chikitin]

Merci l'Expert. Je t'en parlerai Lundi