Icone/Image au lieu d'intitulé de CommandBars

[Boyboy]

Bonjour,

je recherche comment faire pour affecter une image ou une icone à un CommandBars au lieu d'y mettre un intitulé (texte)...
Un peu du style de l'icone d'Excel à coté du menu fichier (vous voyez??? :unsure: )

Quelqu'un pourrait-il m'aider?

Merci @ tous

Boyboy

 

[PAD]

Bonjour le forum, BoyBoy

Va dans les propriétés de l'objet.

A+ PAD

 

[Boyboy]

Bonjour et merci de t'intéresser à ma question!

mais ce que je souhaites faire ne se fait que par code VBA, il n'y a pas d'objet (à moins que je ne comprenne pas ce que tu dis... :S )

voici un extrait de mon code :
Set Wmenu = Application.CommandBars(1).Controls.Add(Type:=msoControlPopup, Temporary:=False)
Wmenu.Caption = 'WatchMenu'
Wmenu.TooltipText = 'Menu personnalisé pour WatchPO'
Wmenu.Style = msoControlButton

Ce que je voudrais savoir, c'est si il existe un paramètre qui permette de définir une image ou une icone au lieu (ou en plus) de
Wmenu.Caption = 'WatchMenu'

Est-ce plus clair?

Merci encore
Boyboy

 

[PAD]

Salut BoyBoy,

Envoie un bout de fichier,


A+ PAD

 

[MichelXld]

bonjour

j'espere que cet exemple pourra t'aider

Lien supprimé


c'est le faceId qui défint l'image qui s'affiche dans le bouton

With Bouton1
.Caption = 'Affichage BO en haut'
.FaceId = 134
.OnAction = 'Haut'
End With



bon apres midi
MichelXld