Discussion :

[ankoubzh]

Bonjour,
Un listbox affiche un certaine zone d'un worksheet, et cette zone est amenée à grandir. J'ai donc adapté les propriétés du listbox en fonction de cette évolution (par exemple, la propriété Columnwidths est construite avec une boucle for, qui parcourt les colonnes de la feuille tant qu'elles sont non-vides)
par contre, pour la propriété Rowsource, j'ai un petit souci.
Dans un premier temps, après la boucle for pour le Columnwidths, je disposais des coordonnées (i,j) de la dernière cellule remplie, donc j'avais "sur le papier" toutes les données nécessaires pour définir le Rowsource.
J'ai donc tenté un

Code :

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

1
2
 
 .rowsource = range(cells(1,1) , cells (i,j))

qui ne fonctionnait pas (même si dans l'aide, il est noté que l'on peut utiliser un objet range pour le rowsource

J'ai donc bidouillé quelquechose du genre :

Code :

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

1
2
 
.rowsource = "mafeuille!A1:" & Chr(64+j) & i

qui fonctionnait très bien, jusqu'à ce que j'atteigne la colonne AA...

Quelle syntaxe puis-je donc adopter pour définir le rowsource, qui soit valable quelquesoit la largeur de ma zone de données ?
Merci

[Krovax]

tant que l'on est dans la bidouille j'en ai une rigolotte

Code :

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

1
2
3
4
5
6
 
Dim col As String
 
col = Split(Cells(1, j).Address, "$")(1)
 
Feuil1.RowSource = "mafeuille!A1:" & col & i

[Qwazerty]

Salut
Il te suffit juste d'utiliser la propriété address de l'objet range ou cells

Code :

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

Feuil1.RowSource = range(cells(1,"AA"),cells(200,"AC")).address

Heu

même si dans l'aide, il est noté que l'on peut utiliser un objet range pour le rowsource

ou ca?

RowSource, propriété@import url(/Office.css);RowSource, propriété


Spécifie la source de données fournissant une liste à un contrôle ComboBox ou ListBox.
Syntaxe
object.RowSource [= String]
La syntaxe de la propriété RowSource comprend les éléments suivants :
Élément Description object Objet valide. String Facultatif. Source de données de la liste du contrôle ComboBox ou ListBox.
Remarques
la propriété RowSource accepte des plages de feuilles de travail de Microsoft Excel.

Si c'est la dernière ligne, il y a quand même une forte nuance entre un objet range (Target par exemple) et une plage de feuille ("feuil1!A1:B16")
a++
Qwaz

[ankoubzh]

merci pour la solution bidouille, j'aime, et ça marche très bien !
pour le range, j'ai peut-être dû lire un peu rapidement l'aide (qui en anglais au boulot, j'ai dû rater une subtilité de langage)