Afficher un variable tableau dans une listbox

bonjour à tous

je souhaiterai savoir comment afficher une variable tableau (6,11) dans une ListeBox multicolonne sans passer une feuille de calcul

merci d'avance pour votre aide

Bonjour

Un essai à tester. Te convient-il ?

Bye !

326classeur1-v1.xlsm (17.79 Ko)

Bonjour, Salut gmb !

Tu affectes simplement ta variable à la propriété List de la ListBox !

    ListBox1.List = MaVariableTablo

Et si ton tableau doit être transposé (1re dimension = colonnes, 2e dimension = lignes), tu utilises alors la propriété Column :

    ListBox1.Column = MaVariableTablo

Cordialement.

Merci pour vos réponses,

J'ai oublié de préciser que la listbox, n'est pas dans Usf mais sur une feuille.

J'ai testé avec .OLEObjects("ListBox1").list = tablo sans succès.

La solution que j'ai trouvé ,c'est de passer mon tablo sur une feuille(ce qui ne m'arrange pas) et définir la propriété ListFillRange .

Si vous avez une solution je suis preneur.

Merci

Bonjour,

ListBox1.List =Tbl

ListBox1.List = Array("aa", "bb", "cc")

Ceuzin

Bonjour,

    ActiveSheet.OLEObjects("ListBox1").Object.List = Tablo

Cordialement.

Merci beaucoup cela fonctionne .

J'ai encore 2 petites questions.

Comment référencer les ColumnHeads dans la listebox et est-il possible de passé ColumnCount a 11 via macro, car j'ai cru comprendre que dans les propriétés 10 était le max?

Merci

http://boisgontierjacques.free.fr/pages_site/formulaireListes2colonnes.htm#EnteteCol

Sub essai()
  Set f = Sheets("bd")
  NomTableau = "Tableau1"
  Adr = f.Range(NomTableau).Address
  NbCol = f.Range(NomTableau).Columns.Count
  Me.ListBox1.ListFillRange = f.Name & "!" & Adr
  For c = 1 To NbCol
    tempcol = tempcol & f.Range(NomTableau).Columns(c).Width * 1# & ";"
  Next c
  Me.ListBox1.ColumnHeads = True
  ListBox1.ColumnCount = NbCol
  ListBox1.ColumnWidths = tempcol
End Sub

Ceuzin

Merci à tous pour votre aide.

Rechercher des sujets similaires à "afficher variable tableau listbox"