Syntaxe Combobox

bonjour,

Je gère le contenu de mes listes déroulantes par Userform de la façon suivante:

Combobox2.rowSource = "Données!A1 : A10"

est il possible décrire ac les cellules?ou sinon qu'elles est la méthode?

ComboBox2.RowSource = "Données!cells(1,1):cells(10,1)"

Mon but étant de pouvoir faire varier le numéro de mes colonnes!

Merci

Bonjour Antho,

Avec quelque chose comme ceci:

Dim NumLigne As Long
NumLigne = 15 'Numéro de la dernière ligne
ComboBox2.RowSource =  Replace("Données!A1:A?", "?", NumLigne)

A+

en fait je veux par rapport a la sélection de ma première combobox que le contenu associé soit affiché dans la combobox 2!

et comme je ne veut rien de fixe c'est à dire je veux pas mettre un code du genre

If ComboBox1 = "Eurocopter" Then ComboBox2.RowSource = "Données!H3..H100"

mais quelque chose du genre:

For x = 7 To 100

If ComboBox1 = Cells(2, x).Value Then ComboBox2.RowSource = "Données!x3..x100"

next x

Mais ce code ne marche pas!

Salut le forum

Antho40, on va jouer longtemps au chat et à la souris

Le même message en doublons ICI

Mytå

P.S. Merci de faire un petit tour sur la Charte : Les règles du Forum

désolé!

Salut le forum

Antho c'est bien de mettre [Résolu]

Mais pour faire avancer les autres, qu'elle est ta solution.....

Mytå

oui pardon

en fait j'ai remplacer l'écriture par

Sheets("Données").Select

For x = 7 To 100

If ComboBox1 = Cells(2, x).Value Then ComboBox2.RowSource = Sheets("Données").Range(Cells(3, x), Cells(100, x)).Address

Next x