Message déjà posté la semaine dernière, mais comme je ne le vois pas
apparaitre dans le groupe, je na sais pas si j'ai des réponses....
Voici le message :
Je 'bricole' sous VBA(excel), mais je pense que mon souci est plutôt général
VB.
(message posté sur ....fr.excel et sur .....fr.vb)
J'affiche des données de longueur très variable dans une listbox de
dimension fixe.
Peut-on, (et par quel moyen), faire un scrooling horizontal sur une listbox
?
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Patrice Henrio
Voici ce que j'ai répondu le 9 juin
Pour ma part pour ce type d'utilisation, je parcours ma liste en écrivant chaque item dans un Label dont la propriété autosize est à True, je récupère le maximum de la largeur et j'affecte la propriété width de mon listbox avec avec cette valeur maximum. Il faut que la propriété font soit identique dans les deux contrôles
Public Sub TailleListe() as Long
Dim Taille As Long, Nom As String Taille=0 For each Nom in UserForm1.Liste UserForm1.Lbl.caption=Nom If Taille < UserForm1.Lbl.caption then Taille=UserForm1.Lbl.caption Next UserForm1.Liste=Taille +5 'on rajoute un petit peu plus pour avoir un léger espace entre l'intitulé et le bord de la liste.
"Candy Raton" a écrit dans le message de news: 448e6fd2$
Bonjour,
Message déjà posté la semaine dernière, mais comme je ne le vois pas apparaitre dans le groupe, je na sais pas si j'ai des réponses.... Voici le message :
Je 'bricole' sous VBA(excel), mais je pense que mon souci est plutôt général VB. (message posté sur ....fr.excel et sur .....fr.vb)
J'affiche des données de longueur très variable dans une listbox de dimension fixe. Peut-on, (et par quel moyen), faire un scrooling horizontal sur une listbox ?
Merci d'avance.
Voici ce que j'ai répondu le 9 juin
Pour ma part pour ce type d'utilisation, je parcours ma liste en écrivant
chaque item dans un Label dont la propriété autosize est à True, je récupère
le maximum de la largeur et j'affecte la propriété width de mon listbox avec
avec cette valeur maximum. Il faut que la propriété font soit identique dans
les deux contrôles
Public Sub TailleListe() as Long
Dim Taille As Long, Nom As String
Taille=0
For each Nom in UserForm1.Liste
UserForm1.Lbl.caption=Nom
If Taille < UserForm1.Lbl.caption then Taille=UserForm1.Lbl.caption
Next
UserForm1.Liste=Taille +5 'on rajoute un petit peu plus pour avoir un léger
espace entre l'intitulé et le bord de la liste.
"Candy Raton" <toto@wanadodo.fr> a écrit dans le message de news:
448e6fd2$1@news.sncf.fr...
Bonjour,
Message déjà posté la semaine dernière, mais comme je ne le vois pas
apparaitre dans le groupe, je na sais pas si j'ai des réponses....
Voici le message :
Je 'bricole' sous VBA(excel), mais je pense que mon souci est plutôt
général
VB.
(message posté sur ....fr.excel et sur .....fr.vb)
J'affiche des données de longueur très variable dans une listbox de
dimension fixe.
Peut-on, (et par quel moyen), faire un scrooling horizontal sur une
listbox
?
Pour ma part pour ce type d'utilisation, je parcours ma liste en écrivant chaque item dans un Label dont la propriété autosize est à True, je récupère le maximum de la largeur et j'affecte la propriété width de mon listbox avec avec cette valeur maximum. Il faut que la propriété font soit identique dans les deux contrôles
Public Sub TailleListe() as Long
Dim Taille As Long, Nom As String Taille=0 For each Nom in UserForm1.Liste UserForm1.Lbl.caption=Nom If Taille < UserForm1.Lbl.caption then Taille=UserForm1.Lbl.caption Next UserForm1.Liste=Taille +5 'on rajoute un petit peu plus pour avoir un léger espace entre l'intitulé et le bord de la liste.
"Candy Raton" a écrit dans le message de news: 448e6fd2$
Bonjour,
Message déjà posté la semaine dernière, mais comme je ne le vois pas apparaitre dans le groupe, je na sais pas si j'ai des réponses.... Voici le message :
Je 'bricole' sous VBA(excel), mais je pense que mon souci est plutôt général VB. (message posté sur ....fr.excel et sur .....fr.vb)
J'affiche des données de longueur très variable dans une listbox de dimension fixe. Peut-on, (et par quel moyen), faire un scrooling horizontal sur une listbox ?
