Affichage dans une listbox

Bonjour au forum,

je souhaiterais afficher dans ma listbox, les éléments de ma feuille, mais mon code n'est pas correct. Je souhaiterais que ma listbox affiche les trois colonnes.

Merci de m'aider

40exo-2.zip (14.47 Ko)

Bonsoir Jeunixe, bonsoir le forum,

Peut-être comme ça :

Private Sub UserForm_Initialize()
Dim WS As Worksheet 'déclare la variable WS (WorkSheet)
Dim TV As Variant 'déclare la variable TV (Tableau des Valeurs)

Set WS = Sheets("Feuil1") 'définit l'onglet WS
TV = Range("A2").CurrentRegion 'définit le tableau des valeurs TV
'définit le nombre de colonnes de la ListBox1 (autant que le tableau des valeurs TV)
Me.ListBox1.ColumnCount = UBound(TV, 2)
Me.ListBox1.List = TV 'alimente la ListBox1 avec le tableau de valeurs TV
End Sub

Salut au forum,

salut ThauThème,

extraordinaire. Ton code est parfait. Merci énormément.

Très respectueusement.

Rechercher des sujets similaires à "affichage listbox"