syntaxe combobox

[antho40000]

bonjour,

Je gère le contenu de deux listes déroulantes par Userform de la façon suivante:
Sub...
For x =7 to 100

if combobox1.value = cells(2,x) then Combobox2.rowSource = "Données!A1 : A10"

Next x
end sub
j'aimerais faire en sorte que dans l'expression "Données!A1 : A10", les colonnes soient des variables variant de la même maniére que x.

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

 

[ledzepfred]

Re : syntaxe combobox

Bonsoir,

tu utilises surement un userform car la propriété rowsource n'existe pas pour un combobox dans une feuille (propriété ListfillRange), pour répondre au mieux à ta question, il faudrait que tu fournisses un petit fichier avec quelques données et l'userform.

Sinon quelques questions :

- Quand x=8 quelle doit être la plage rowsource (B1:B10)? idem pour x=9(C1:C10)? bref est-ce que le glissement de plage suit bien la valeur de x-6?

A te lire

 

[Pierrot93]

Re : syntaxe combobox

Bonjour Antho, Ledzep

bien que n'étant pas un fan du "RowSource", regarde le code ci dessous :

Dim i As Byte, j As Byte
i = 1
j = 15
ComboBox1.RowSource = Sheets("Feuil1").Range(Cells(i, 1), Cells(j, 1)).Address

bonne journée
@+

Edition : si la feuille en question n'est pas la feuille active :

With Sheets("Feuil1")
    ComboBox1.RowSource = "Feuil1!" & .Range(.Cells(i, 1), .Cells(j, 1)).Address
End With

 

[antho40000]

Re : syntaxe combobox

Merci beaucoup de vos réponse je test ça toute à l'heure et je vous tiens au courant!

Bonne journée

 

[antho40000]

Re : syntaxe combobox

je viens de tester ta solution pierrot!
et c'est nickel c'est tout a fait ce que je cherchais merci beaucoup de vos réponse!