Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2016 ListBox multi colonne avec RowSource

Don pépé

XLDnaute Occasionnel
Bien le bonjour,
Je sui entrain de faire une ListBox, je voudrais rajouter une seconde colonne mais cela ne fonctionne pas
donc normalement le rowsource commence en ligne A5 je voudrai que sa prenne aussi la B
Private Sub UserForm_Initialize()
'RowSource =DECALER($A$5;;;NBVAL($A:$B)-1)
Me.ListBox1.ColumnCount = 3
Me.ListBox1.ColumnWidths = "20,70"
Me.ListBox1.RowSource = "Favoris"

End Sub
Merci pour votre aide
 
Solution
Bien le bonjour,
Je sui entrain de faire une ListBox, je voudrais rajouter une seconde colonne mais cela ne fonctionne pas
donc normalement le rowsource commence en ligne A5 je voudrai que sa prenne aussi la B

Merci pour votre aide
Bonjour,
Me.ListBox1.ColumnWidths = "20,70"
Serait
Me.ListBox1.ColumnWidths = "20;70"
Une proposition en PJ avec ce code
VB:
Private Sub UserForm_Initialize()
    Me.ListBox1.ColumnCount = 2
    Me.ListBox1.ColumnWidths = "30;70"
    Me.ListBox1.RowSource = "Favoris"
    '************ Favoris= Voir Gestionnaire de noms *********
End Sub

Jacky67

XLDnaute Barbatruc
Bien le bonjour,
Je sui entrain de faire une ListBox, je voudrais rajouter une seconde colonne mais cela ne fonctionne pas
donc normalement le rowsource commence en ligne A5 je voudrai que sa prenne aussi la B

Merci pour votre aide
Bonjour,
Me.ListBox1.ColumnWidths = "20,70"
Serait
Me.ListBox1.ColumnWidths = "20;70"
Une proposition en PJ avec ce code
VB:
Private Sub UserForm_Initialize()
    Me.ListBox1.ColumnCount = 2
    Me.ListBox1.ColumnWidths = "30;70"
    Me.ListBox1.RowSource = "Favoris"
    '************ Favoris= Voir Gestionnaire de noms *********
End Sub
 

Pièces jointes

  • listboxDompepe.xlsm
    17.3 KB · Affichages: 26

Discussions similaires

Réponses
17
Affichages
1 K
Réponses
3
Affichages
570
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…