XL 2010 Adaptation largeur Combo

youky(BJ)

XLDnaute Barbatruc

• 30 Octobre 2020

• #2

Bonsoir Hervé,
Mettre la propriété AutoSize=true dans le ou les combobox
Attention car ils passent en dessous des boutons si besoin
Bruno

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 30 Octobre 2020

• #3

Bonsoir herve62, Bruno,

youky(BJ) à dit:

Mettre la propriété AutoSize=true dans le ou les combobox

Cliquez pour agrandir...

Chez moi cela ajuste la largeur de la zone d'affichage, pas celle de la liste déroulante.

A+

 

Vote positif 0 Vote négatif

youky(BJ)

XLDnaute Barbatruc

• 30 Octobre 2020

• #4

Bonjour Gérard,
Ben oui ! Par contre je comprends pas trop la demande . . .
Tout agrandir autant le faire dés le départ ou réduire la fonte
Attention aussi aux boutons qui restent par dessus.
Pas d'autres idées pour moi.
Bruno

 

Vote positif 0 Vote négatif

youky(BJ)

XLDnaute Barbatruc

• 30 Octobre 2020

• #5

Ah! Compris
J'avais pas été voir au bon endroit, en plus j'avais jamais utilisé . . .
On peux régler si besoin 8.6 à 9
Bruno

VB:

Private Sub Videos_enter()
J = Videos.Width / 4 - 10                   'AJOUT pour LARGEUR
For I = 0 To Videos.ListCount - 1
    If Len(Videos.List(I)) > J Then
        J = Len(Videos.List(I))
        'Videos.ListWidth = Len(Videos.List(I)) * 4
    End If
Next I
tx = J * 8.6 & " pt"
Videos.ListWidth = tx
Exit Sub
'FIN ICI

 

Vote positif 0 Vote négatif

herve62

XLDnaute Barbatruc

Supporter XLD

• 30 Octobre 2020

• #6

Bonsoir
merci
Je parle bien de largeur , c'est pour ça que j'ai mis juste une image du petit fichier que j'ai fait avec le bout de code : CA MArche !! on voit bien une grande phrase se mettre entière alors que la combo fait le 1/3 !!
C'est le même code , même données du fichier que j'ai joint mais là la longue phrase n'apparait pas et dans le cadre de la liste on ne voit pas l'étirement ??
Là pour éviter les confusions et être clair , je joins le petit fichier ou l'on voit bien le cadre s'afficher avec une largeur qui permet de lire les données complètes
Sinon le fichier de travail est encore pire ..vous avez dû voir ?? (image jointe)

 

Pièces jointes

• adap_combo.xlsm

  20.7 KB · Affichages: 1
• combo-pire.jpg

  40.5 KB · Affichages: 11

Vote positif 0 Vote négatif

youky(BJ)

XLDnaute Barbatruc

• 30 Octobre 2020

• #7

Re, Hervé je mets le fichier
La macro est seulement en combobox video
Bon !j'ai neutralisé le plein écran de l'user et application.visible par précaution.
Facile à remettre
Bruno

 

Pièces jointes

• test_larg_combo.xlsm

  83.9 KB · Affichages: 9

Vote positif 0 Vote négatif

herve62

XLDnaute Barbatruc

Supporter XLD

• 30 Octobre 2020

• #8

Merci Bruno
bin voilà bon je vais remettre tout cela dans le GROS vrai fichier ( 8Mo) et voir si cela fonctionne
par contre , pourquoi le code d'un fichier ne fonctionne pas dans l'autre ?

 

Vote positif 0 Vote négatif

herve62

XLDnaute Barbatruc

Supporter XLD

• 31 Octobre 2020

• #9

Bonjour , Slt Patrick
Moi je voulais juste adapter UN combo selon la longueur des données
là tu parles d'un USF resize ... c'est pas le sujet de mon post ???
C'est pour un ami qui n'arrive pas à terminer !!

 

Vote positif 0 Vote négatif

herve62

XLDnaute Barbatruc

Supporter XLD

• 1 Novembre 2020

• #10

Bonjour
Merci Patrick , déjà c'est ce que je demandais ....je vais en tirer ce qui me va pour mettre dans la GROOSSSEUUU ... AAPLI DANKE SEHR !!!.. 😀😀

 

Vote positif 0 Vote négatif

herve62

XLDnaute Barbatruc

Supporter XLD

• 1 Novembre 2020

• #11

patricktoulon à dit:

pour la simple et bonne raison que tu a planter la protection dans le tien
en effet on peu tripatouiller le code mais si on touche aux refs ben il demande un mot de passe qui n'existe plus :total c'est cramé!!!!!!

Cliquez pour agrandir...

Je pige pas ?? cela fait presque 1 an que j'aide le pote .... le fichier grossit ..grossit ................;et il en rajoute et encore et encore ( d'accord ...d'accord 😀😀 ) mais il ne maîtrise rien !! je viens juste encore de lui répondre sur le show modal !
Là son fichier reçu via "MEGA" .. son xlsm = 6Mo et ses vidéos faisaient 2,5 GIGA !!!!!!!!!!!!!!!!!!!!!!!!
Donc j'ai repris une ancienne version "étayée" pour joindre ici et juste interressé à son combo et pas vu le reste !!

 

Vote positif 0 Vote négatif

herve62

XLDnaute Barbatruc

Supporter XLD

• 1 Novembre 2020

• #12

Bof t'inquiète c'est du brouillon , je prends ton code et .....rubbish (poubelle)
je remet dans le vrai
Là je suis avec mon Zig !!! il merdoie avec le show /hide usf : err 400 , déjà affiché , afichage modal impossible
Il va m'user ... j'ai commencé avec lui en 2013 !!!!! ( sa caserne de pompiers , usine à gaz ....mais no SHUSHI les soldats du feu veillaient 😀😀)

 

Vote positif 0 Vote négatif

herve62

XLDnaute Barbatruc

Supporter XLD

• 1 Novembre 2020

• #13

son dernier Pb à l'instant
donc dernière question pour ton avis et comparer avec le mien :
tu as un usf 1
dedans un bouton qui fait :
USF2.show
USF1.hide

Ensuite on arrive dans le 2 , on clic sur un bouton qui fait
unload Me
usf1.show

en fait c'est : clique sur mon bouton pour fermer l’UserForm2, pour revenir à l’UserForm1
Moi je sais faire MAIS COMMENT expliquer ??
Apparemment il veut superposer 2 USF ?? c'est pas possible ??
Sinon BONNE SOIREE A TOI !!

 

Vote positif 0 Vote négatif

herve62

XLDnaute Barbatruc

Supporter XLD

• 1 Novembre 2020

• #14

patricktoulon à dit:

il a trouvé le bonnard ton pot laisse le se démerder un peu

Cliquez pour agrandir...

Oui je sais .. il n'y a pas que lui , mais c'est le bon gars ...sympa, dans le 57
j'ai répondu : pas de superposition d'usf , tranquille
Là je remets à jour ses listes qui remplissent auto son onglet "liste" selon ses répertoires , puis ADD dans les combo , et je finirais avec ton bout de code pour adapter ses largeurs de listes de COMBO
ET PIS C TOUT !!!!!!!🤪
Encore merci ; A+

 

Vote positif 0 Vote négatif

herve62

XLDnaute Barbatruc

Supporter XLD

• 3 Novembre 2020

• #15

Bonjour ; Slt Patrick
j'ai tenté de mettre ton code mais cela ne fonctionne pas ; Je ne vois pas comment les COMBO s'adaptent à la longueur du texte de leurs colonnes ( j'ai juste fait avec VIDEO)

 

Pièces jointes

• test_larg_combo2.xlsm

  77.7 KB · Affichages: 5

Vote positif 0 Vote négatif