Passage d'un tableau à une listbox

  • Initiateur de la discussion Initiateur de la discussion oriop
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

O

oriop

Guest
Bonjour,

voici mon problème:

Je souhaiterais passer un tableau de valeurs que j'ai sur une feuille de
calcul excel dans un cadre (listbox je pense) à l'intérieur d'un userform.

Le problème étant que mon tableau contient plusieurs colonnes et je voudrais
que le programme recopie toutes les informations de chaque ligne (toutes les
colonnes en fait 🙂 )

Si vous avez une réponse à ce problème ... ou que vous n'avez pas compris
n'hésitez pas à répondre 🙂

merci à tous.
 
Salut ORIOP,

bon ben je vais t'aider (pour 1 fis que je peux aider quelqu'un sur ce forum) , du moins essayer.

Tu créé un Userform avec une listbox. Après tu vas ds propriétés de ta listbox :

Ds 'Column count' tu reportes le nbre de colonnes


Ds Columnwidths tu reportes la largeur de tes colonnes (la largeur que tu veux ds ta listbox (ex :25 pt; 50pt;80 pt ) si tu as 3 colonnes.

Ds la rowsource, tu reporte la zone de ton tableau source : Le mioeux est de donner un nom à la zone de ton tableau et de reporter ce nom ds la rowsource.

Sinon met ton fichier en pièce jointe, d'ici ce soir tu auras un retour.

c'est clair??

VBA DEAD
 
Bonjour
essai cela

Private Sub inilb1() ' initilialise la source de ton tableau
Dim L As Integer
Dim plage As String
L = Sheets('data1').Range('a65536').End(xlUp).Row
plage = Sheets('data1').Range('a11:h' & L).Address 'debut & fin
ListBox1.RowSource = 'data1!' & plage

End Sub

et...........

Private Sub UserForm_Initialize()

With ListBox1
.ColumnCount = 6 ' defini nb colonne tableau
.ColumnWidths = '50;40;40;40;40;40' ' largeur des colonnes
.MultiSelect = fmMultiSelectMulti ' si tu veux un multiselect
End With

inilb1

End Sub



good luck
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
2
Affichages
238
  • Question Question
XL 2021 listbox
Réponses
18
Affichages
732
Réponses
10
Affichages
511
Retour