Titre colonne dans listBox

Signaler
Messages postés
120
Date d'inscription
samedi 28 janvier 2017
Statut
Membre
Dernière intervention
19 mars 2021
-
Messages postés
120
Date d'inscription
samedi 28 janvier 2017
Statut
Membre
Dernière intervention
19 mars 2021
-
Bonjour à tous,

Voici mon problème :
ColumnHeads = True
permet d'intégrer un titre à la listBox, la plage source étant la ligne précédente la 1ère ligne de données.

En ce qui me concerne, ma 1ère ligne de données peut se situer n'importe ou (ligne 500 par exemple), mais la plage de titres se retrouve toujours en ligne 1.

Comment adapter le code ?
Merci de votre aide

F60lebaladinverni

1 réponse

Messages postés
7340
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
20 avril 2021
122
Bonjour,

en regardant ceci tu trouveras la solution:

https://silkyroad.developpez.com/VBA/ControlesUserForm/#LII-G


Option Explicit
Private Sub UserForm_Initialize()
    'Remarque:
    'ColumnHeads = True spécifie que la première cellule précédent
    'la plage source est utilisée comme titre dans la ListBox.
    'ColumnHeads ne fonctionne pas pour la propriété List() et la
    'méthode AddItem.
    ListBox1.ColumnHeads = True
     ListBox1.RowSource = "Feuil1!A2:A1000"
   ListBox1.TopIndex = 499  'affiche la ligne 500 en dessous de la ligne de titre 
End Sub



Voilà

Messages postés
120
Date d'inscription
samedi 28 janvier 2017
Statut
Membre
Dernière intervention
19 mars 2021

Bonsoir

Merci pour ta réponse.
Malheureusement j'étais arrivé aussi à cette solution mais j'utilise la méthode AddItem car je fais des filtres ...
Y aurait-il un autre moyen ?

Cordialement
Messages postés
7340
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
20 avril 2021
122
A part mettre un Label au dessus de ta ListBox avec la plage de titre, je ne vois rien d'autre!

C'est bien indiqué

ColumnHeads ne fonctionne pas pour la propriété List() et la méthode AddItem.

voilà
Messages postés
120
Date d'inscription
samedi 28 janvier 2017
Statut
Membre
Dernière intervention
19 mars 2021

D'accord, peut-être y aura-t-il une nouvelle commande à l'avenir.
Merci pour ta réponse, je vais mettre des label