Affichage Listbox

Bonjour,

J'ai un souci avec ma listbox qui n'affiche pas toutes les données de mon tableau et en suite je voudrai que lorsque je sélectionne une ligne dans la listbox l'image correspondante s'affiche.

Je joint mon fichier pour plus de compréhension

merci d'avance

Bonjour Micîd, bonjour le forum,

Tu codes :

Function show_data_in_listbox()
ListBox1.ColumnCount = 21
ListBox1.ColumnWidths = "40;0;0;0;80;30;150;150;150;50;50;50;50;50;50;50;50;50;50;"

Dim lastrow As Long
lastrow = Cells(Rows.Count, "A").End(xlUp).Row
ListBox1.RowSource = "source!A2:T" & lastrow
ListBox1.ColumnHeads = False
End Function

Tu définis 21 colonnes pour la ListBox1 (avec les colonnes 1, 2 et 3 masquées). La source ne va que de A à T (20 colonnes) et le tableau de A à V (22 colonnes). Faudrait peut être harmoniser tout ça non ?!...

Bonsoir,

De plus, en utilisant la propriété RowSource sur une plage qui sera modifiée à l'exécution, vous allez rencontrer des erreurs, voire un plantage d'Excel.

J'ai harmoniser en modifiant le nombre des colonnes mais comment éviter les erreurs et le plantage d'excel.

Ensuite comment afficher les images lorsque je sélectionne une ligne dans la ligne de la listbox1

Bonjour le fil, bonjour le forum,

To fichier harmonisé et une explication de la procédure qui fait planter Excel, sinon on ne peut rien faire...