Microsoft 365 ComboBox ne pas faire apparaître la barre affichage menu

[Usine à gaz]

Bonjour à toutes et à tous,
Je vous souhaite une belle journée

Je "coince" sur un nouveau sujet : "ComboBox ne pas faire apparaître la barre affichage menu"

Mes recherches et tentatives n'ont pas abouti

Voici la photo de ce que je souhaite :

Auriez=-vous la solution vba ?
Je joins si un fichier test.
Avec mes remerciements,
Amicalement,
lionel,

 

[JM27]

Bonjour
Utilises une list box
Voir le premier userform

 

[Usine à gaz]

Bonjour JM27
Je vais voir
lionel

 

[job75]

Bonjour Lionel, JM27,

Mes recherches et tentatives n'ont pas abouti

On a pourtant vu ça il n'y a pas longtemps :

https://www.excel-downloads.com/thr...dans-la-feuille.20045403/page-3#post-20335589

Il suffit donc de mettre la propriété Height des ComboBox à 1 dans le fichier joint.

A+

 

[Usine à gaz]

Bjr Gérard
Merci de me l'avoir rappelé
Je n'avais pas fait la relation car dans le fil que tu évoques, j'étais "branché" sur le menu déroulant.
LOL, au fait dans ce fil et grâce à toi, j'ai fini par trouver "ma" solution
Encore merci

 

[JM27]

Bonsoir Job
Je ne connaissais pas l'astuce , mais un peu capillo-tractée

 

[Usine à gaz]

LOL OUI mais super efficace

 

[Usine à gaz]

Pour Gérard, si tu as qq instants
Je joins le fichier que j'ai réussi à faire grâce à toi après de fil :
https://www.excel-downloads.com/thr...dans-la-feuille.20045403/page-3#post-20335589

 

[Usine à gaz]

Re-JM27
LOL, j'avais oublié le merci pour toi car c'est bien aussi.
lionel

 

[job75]

Une fois la hauteur des ComboBox mise à 1 pas facile de revenir en arrière...

Pour éviter tout souci utiliser cette macro :

Sub Hauteur_Combobox()
Dim h#, vbc As Object
h = 18.75 'à adapter
On Error Resume Next
For Each vbc In ThisWorkbook.VBProject.VBComponents
    vbc.Designer.Controls("ComboBox1").Height = h
Next
End Sub

 

[Usine à gaz]

Re Gérard,
Oui, je suis d'accord, merci pour le code
Je vais tester,
lionel

 

[Usine à gaz]

Re-Gérard ... comme tjrs, c'est nickel
lionel,