Rowsource ComboboxRésolu

Question

Bonjour,

En tant que débutant je rencontre bien évidement des problèmes sur des choses élémentaires... Voila mon soucis: J'ai une combobox dans un userform, et je souhaite la remplir avec les lignes de 2 à la dernière ligne remplie de plusieurs colonnes (de A à E) et je n'y arrive bien évidemment pas!

J'ai fait ceci:
With Sheets("Societes")
            
        Me.ComboBoxSoc.RowSource = Sheets("Societes").Range("A2:E2" & Sheets("Societes").Range("A65536:E65536").End(xlUp).Row).Value
        
    End With

Qui me donne une erreur n°13.

Ca doit sauter aux yeux de plus d'un mais perso je vois pas pourquoi ca coince 

Merci de m'aider

rv83toulon · Accepted Answer

Bonjour,
Ta combobox à plusieurs colonnes ici 5.
Pour les afficher dans la combo il définir le nbr de colonne par l'instruction "columncount"

je te conseil également de remplir une combo avec la propriétés list plutôt que rowsources.
voici comment se présente le code :With Sheets("Societes")
tblcombo = .Range("A2:E" & .Range("E" & Rows.Count).End(xlUp).Row)
End With

With Me.ComboBoxSoc
'Définie le nbr de colonne de la combo ici 5 = colA à E
.ColumnCount = 5
'remplir la combo avec le tbl ci-dessus
.List = tblcombo
End With

@+

Franckydenantes · Answer

Merci pour ta réponse! ;)

Rowsource Combobox

2 réponses

Votre réponse

Discussions similaires