OVH Cloud OVH Cloud

Touche de raccourci d'un bouton personnalisé

3 réponses
Avatar
garnote
Bonjour,

J'ai un blanc et ne trouve pas ce que je veux dans l'aide 2003.
J'ai installé un bouton personnalisé dans la barre de menus
de la feuille de calcul. Pour l'info-bulle, j'ai écrit :
&Joue un MP3 au hasard. Comment faire pour que la première
lettre (J) soit soulignée (c'est ma touche de raccourci).

Merci et A+

Serge

3 réponses

Avatar
garnote
OK, j'ai trouvé.
Il me faut afficher image et texte ou texte seulement
pour voir le soulignement.
Pas fini de digérer mon ragoût de pattes ;-)

Serge


"garnote" a écrit dans le message de news:
Bonjour,

J'ai un blanc et ne trouve pas ce que je veux dans l'aide 2003.
J'ai installé un bouton personnalisé dans la barre de menus
&Joue un MP3 au hasard. Comment faire pour que la première
lettre (J) soit soulignée (c'est ma touche de raccourci).

Merci et A+

Serge



Avatar
MichDenis
A moins que tu soliliques... il serait intéressant que tu expliques
ce que tu as trouvé... il y a peut être un ou deux lecteurs intéressé.

Un exemple de création d'une barre avec une lettre souligné dans
la propriété "Caption" qui permet d'appeler la macro par la touche
Alt + "la lettre soulignée"

Pour obtenir cet effet :
A ) On doit faire afficher la propriété Caption du bouton
Ceci est fait en définissant la propriété "Style" du contrôle
B ) Devant la lettre que l'on veux souligner on doit insérer le caractère "&"

'--------------------------------
Sub test()

Dim x As MsoButtonStyle
x = msoButtonCaption

On Error Resume Next
Application.CommandBars("toto").Delete
With Application.CommandBars.Add("toto")
With .Controls.Add
.Style = x
.Caption = "&joue"
.OnAction = "Bonjour"
End With
.Visible = True
End With

End Sub
'--------------------------------


"garnote" a écrit dans le message de news:

Bonjour,

J'ai un blanc et ne trouve pas ce que je veux dans l'aide 2003.
J'ai installé un bouton personnalisé dans la barre de menus
&Joue un MP3 au hasard. Comment faire pour que la première
lettre (J) soit soulignée (c'est ma touche de raccourci).

Merci et A+

Serge
Avatar
garnote
http://cjoint.com/?bfas1glyTV



"MichDenis" a écrit dans le message de news:
A moins que tu soliliques... il serait intéressant que tu expliques
ce que tu as trouvé... il y a peut être un ou deux lecteurs intéressé.

Un exemple de création d'une barre avec une lettre souligné dans
la propriété "Caption" qui permet d'appeler la macro par la touche
Alt + "la lettre soulignée"

Pour obtenir cet effet :
A ) On doit faire afficher la propriété Caption du bouton
Ceci est fait en définissant la propriété "Style" du contrôle
B ) Devant la lettre que l'on veux souligner on doit insérer le caractère "&"

'--------------------------------
Sub test()

Dim x As MsoButtonStyle
x = msoButtonCaption

On Error Resume Next
Application.CommandBars("toto").Delete
With Application.CommandBars.Add("toto")
With .Controls.Add
.Style = x
.Caption = "&joue"
.OnAction = "Bonjour"
End With
.Visible = True
End With

End Sub
'--------------------------------


"garnote" a écrit dans le message de news:

Bonjour,

J'ai un blanc et ne trouve pas ce que je veux dans l'aide 2003.
J'ai installé un bouton personnalisé dans la barre de menus
&Joue un MP3 au hasard. Comment faire pour que la première
lettre (J) soit soulignée (c'est ma touche de raccourci).

Merci et A+

Serge