OVH Cloud OVH Cloud

ListBox et Colonnes

1 réponse
Avatar
Hubert
Bonjour
J'ai une listbox à 4 elements dans un userform qui m'affiche 4 colonnes
d'une base excel. Est il possible d'afficher par exemple les colonnes 1,
3,5,6 par le click d'un bouton et 2,4,7,8 par un autre bouton ??
Merci d'avance !!

1 réponse

Avatar
docm
Bonjour.

Dim t(9, 3) 'Pour un tableau de 10 lignes et 4 colonnes
'D'abord créer un tableau avec les valeurs des colonnes 1, 3, 5, 6
a = Array(1, 3, 5, 6)
For ligne = 1 To 10
For colonne = 1 To 4
t(ligne - 1, colonne - 1) = Feuil1.Cells(ligne, a(colonne - 1))
Next
Next
'Chargez le contrôle ListBox1 avec le tableau
ListBox1.List() = t

docm

"Hubert" a écrit dans le message news:

Bonjour
J'ai une listbox à 4 elements dans un userform qui m'affiche 4 colonnes
d'une base excel. Est il possible d'afficher par exemple les colonnes 1,
3,5,6 par le click d'un bouton et 2,4,7,8 par un autre bouton ??
Merci d'avance !!