Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Entete de colonne dans un listbox

6 réponses
Avatar
Alex
Bonjour =E0 tous,=20

J'ai consult=E9 diff=E9rent sujet sur le forum, mais malgre cela je n'ai pa=
s trouv=E9 la solution.=20

Quelqu'un serait il comment parametrer un listbox pour afficher en titre de=
la listbox mes titres de colonnes qui se trouvent en ligne 1 de mon tablea=
u, et que cela ne m'affiche pas ma ligne 1 en tant que Donn=E9es mais titre=
.

J'ai mis ColumnHeads =3D True et Row source A2:P1048576,

Losrque je suis sur VB l'affichage, marque bien ma ligne 1 en titre et les =
lignes suivantes en donn=E9es. Mais lorsque j'active le Userform, j'ai de n=
ouveau Colonne A Colonne B....

Comment faire pour r=E9soudre se probl=E8me.

Merci par avance de votre aide.

Amicalement
Alex

6 réponses

Avatar
DanielCo
Bonjour,
Qu'est-ce que tu as dans Userform_Initialize et dans Userform_Activate
?
Cordialement.
Daniel


Bonjour à tous,

J'ai consulté différent sujet sur le forum, mais malgre cela je n'ai pas
trouvé la solution.

Quelqu'un serait il comment parametrer un listbox pour afficher en titre de
la listbox mes titres de colonnes qui se trouvent en ligne 1 de mon tableau,
et que cela ne m'affiche pas ma ligne 1 en tant que Données mais titre.

J'ai mis ColumnHeads = True et Row source A2:P1048576,

Losrque je suis sur VB l'affichage, marque bien ma ligne 1 en titre et les
lignes suivantes en données. Mais lorsque j'active le Userform, j'ai de
nouveau Colonne A Colonne B....

Comment faire pour résoudre se problème.

Merci par avance de votre aide.

Amicalement
Alex
Avatar
MichD
Bonjour,

Suppose que tu as une ligne de titre en A1:C1
Suppose les données en A2:C10

Tu définis les propriétés suivantes du listBox

ColumnCount = 3
ColumnWidths = 40;40;40 'Où la largeur de chaque colonne comme tu le veux
RowSource = Feuil1!A2:C10

Tu devrais voir les titres de colonnes apparaître dans le listbox soit le
contenu de la ligne A1:C1.

Quand tu indiques à Excel, que la listbox contient des titres de colonnes,
Excel prend automatiquement
la ligne précédente (au-dessus) de la plage de données définie comme
RowSource comme étiquettes de colonnes.

Tu peux utiliser l'événement "UserForm_Initialize" du formulaire pour
renseigner ces propriétés...selon les besoins de ton application.
Avatar
Alex
Bonsoir,

Merci pour vos réponses, j'ai fini par trouver mon erreur.

Mon paramétrage du listbox que je décrivais dans mon 1er message étai t en conflit avec le paramétrage de ma plage "base" pour la macro qui g ênerait l'affichage de ma base dans le listbox.

Néanmoins ce probleme résolu, pour ma macro double clic sur une ligne d u listbox pour aller pointer la ligne correspondante sur la base, j'ai du f aire +2 pour qu'il sélectionne la bonne ligne mais je n'ai pas compris po urquoi ?


Merci encore de votre aide.

Alex
Avatar
Jacky
Bonsoir,
..., j'ai du faire +2 pour qu'il sélectionne la bonne ligne mais je n'ai pas compris pourquoi ?






-L'index d'une listebox commence (par défaut) à zéro
-La plage commence à la ligne 2
Il est donc normal de devoir ajouter 2 pour pointer sur la bonne ligne.


--
Salutations
JJ


"Alex" a écrit dans le message de news:

Bonsoir,

Merci pour vos réponses, j'ai fini par trouver mon erreur.

Mon paramétrage du listbox que je décrivais dans mon 1er message était en conflit avec le paramétrage de ma
plage "base" pour la macro qui gênerait l'affichage de ma base dans le listbox.

Néanmoins ce probleme résolu, pour ma macro double clic sur une ligne du listbox pour aller pointer la ligne
correspondante sur la base, j'ai du faire +2 pour qu'il sélectionne la bonne ligne mais je n'ai pas compris
pourquoi ?


Merci encore de votre aide.

Alex
Avatar
MichD
Fichier Exemple : http://cjoint.com/?ECeaKRdtzJ5

+1 devrait être suffisant...
'-----------------------------------
Private Sub ListBox1_Click()
With Me.ListBox1
' MsgBox .List(.ListIndex, 0)'pour afficher la valeur sélectionnée de la
colonne1
Range(Me.ListBox1.RowSource).Rows(.ListIndex + 1).Select
'<<<================= End With
End Sub
'-----------------------------------
Avatar
Alex
Bonjour,
Merci pour ce retour et exemple de fichier.
J'ai appliquer la configuration du fichier joint et cela fonctione super bien, et en effet +1 suffit :)
Merci encore
Alex