Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Affichage texte d'un bouton dans une barre d'outils

Affichage texte d'un bouton dans une barre d'outils

4 réponses
Avatar
Albator V
bonjour,

voila j'ai fait une macro qui cr=E9 une barre d'outils avec=20
des boutons. quel est le code a mettre pour qu'il y ai le=20
texte et licone de mon bouton ??

meci davance
Signaler un problème avec ce contenu

4 réponses

Supprimer
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
Avatar
Cyrille
Bonjour,
le code est le suivant :
Set Bton1 = CommandBars("MaBarre").Controls _
.Add(Type:=msoControlButton, ID:F9, Before:=2)
With Bton1
.Style = msoButtonIconAndCaptionBelow'ICI !!!
.Caption = "&Activer les Items"'Légende du bouton
End With

Bon courage,

Cyrille
-----Message d'origine-----
bonjour,

voila j'ai fait une macro qui cré une barre d'outils avec
des boutons. quel est le code a mettre pour qu'il y ai le
texte et licone de mon bouton ??

meci davance
.



Avatar
Albator V
Merci c genial
et pour mon info personnel, comment mettre licone et le
texte sur la meme ligne ??

-----Message d'origine-----
Bonjour,
le code est le suivant :
Set Bton1 = CommandBars("MaBarre").Controls _
.Add(Type:=msoControlButton, ID:F9, Before:=2)
With Bton1
.Style = msoButtonIconAndCaptionBelow'ICI !!!
.Caption = "&Activer les Items"'Légende du bouton
End With

Bon courage,

Cyrille
-----Message d'origine-----
bonjour,

voila j'ai fait une macro qui cré une barre d'outils
avec


des boutons. quel est le code a mettre pour qu'il y ai
le


texte et licone de mon bouton ??

meci davance
.

.





Avatar
Albator V
en fait faut juste enlever le Below et ca le place a
droite...
-----Message d'origine-----
Merci c genial
et pour mon info personnel, comment mettre licone et le
texte sur la meme ligne ??

-----Message d'origine-----
Bonjour,
le code est le suivant :
Set Bton1 = CommandBars("MaBarre").Controls _
.Add(Type:=msoControlButton, ID:F9, Before:=2)
With Bton1
.Style = msoButtonIconAndCaptionBelow'ICI !!!
.Caption = "&Activer les Items"'Légende du bouton
End With

Bon courage,

Cyrille
-----Message d'origine-----
bonjour,

voila j'ai fait une macro qui cré une barre d'outils
avec


des boutons. quel est le code a mettre pour qu'il y ai
le


texte et licone de mon bouton ??

meci davance
.

.


.






Avatar
Cyrille
Ben voilà t'as trouvé tout seul !!

a+
:))
-----Message d'origine-----
en fait faut juste enlever le Below et ca le place a
droite...
-----Message d'origine-----
Merci c genial
et pour mon info personnel, comment mettre licone et le
texte sur la meme ligne ??

-----Message d'origine-----
Bonjour,
le code est le suivant :
Set Bton1 = CommandBars("MaBarre").Controls _
.Add(Type:=msoControlButton, ID:F9, Before:=2)
With Bton1
.Style = msoButtonIconAndCaptionBelow'ICI !!!
.Caption = "&Activer les Items"'Légende du bouton
End With

Bon courage,

Cyrille
-----Message d'origine-----
bonjour,

voila j'ai fait une macro qui cré une barre d'outils
avec


des boutons. quel est le code a mettre pour qu'il y ai
le


texte et licone de mon bouton ??

meci davance
.

.


.


.