Bonjour!
Quelle serait la syntaxe permettant de charger dans une listbox à 2 colonnes des données qui ne se présentent pas sous la forme d'un tableau.
Je souhaite récupérer :
- dans la colonne 1 de la listbox le NOM des feuilles (feuille active jusqu'à la dernière)
- dans la colonne 2, le contenu d'une cellule (A4, par exemple) de chacune des feuilles précédentes.
J'y arrive en mettant ttes les données dans 2 colonnes de la première feuille par exemple et arrive à récupérer ces 2 colonnes. Mais ce n'est pas joli,joli!
J'arrive à rajouter ces données ds ma listbox mais une en dessous les unes des autres!
Sinon, j'ai du mal avec la syntaxe List (dans l'aide),
Listbox1.List(FeuilRest,0)
ListBox1.List(FeuilRest,1)
si quelqu'un pouvait m'aiguiller sur la syntaxe!
Merci
Lio59
Quelle serait la syntaxe permettant de charger dans une listbox à 2 colonnes des données qui ne se présentent pas sous la forme d'un tableau.
Je souhaite récupérer :
- dans la colonne 1 de la listbox le NOM des feuilles (feuille active jusqu'à la dernière)
- dans la colonne 2, le contenu d'une cellule (A4, par exemple) de chacune des feuilles précédentes.
J'y arrive en mettant ttes les données dans 2 colonnes de la première feuille par exemple et arrive à récupérer ces 2 colonnes. Mais ce n'est pas joli,joli!
J'arrive à rajouter ces données ds ma listbox mais une en dessous les unes des autres!
Code:
Private Sub UserForm_Initialize()
Dim FeuilRest As Integer
For FeuilRest = ActiveSheet.Index To Sheets.Count
Me.ListBox1.AddItem Sheets(FeuilRest).Name
Me.ListBox1.AddItem Sheets(FeuilRest).Range("M4").Value
Next FeuilRest
End Sub
Sinon, j'ai du mal avec la syntaxe List (dans l'aide),
Listbox1.List(FeuilRest,0)
ListBox1.List(FeuilRest,1)
si quelqu'un pouvait m'aiguiller sur la syntaxe!
Merci
Lio59