Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Barre de menus

Barre de menus

7 réponses
Avatar
Luce Girard
Bonjour,
Savez-vous comment insérer un séparateur dans une barre d'outils
personnalisée ?
et comment insérer un menu de type msoControlSplitButtonPopup
c'est-à-dire comme le bouton des bordures ds Excel ?
Merci
Luce
Signaler un problème avec ce contenu

7 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
AV
Un truc comme ça.. :
.....
Set newitem = cbDA.Controls.Add(Type:=msoControlButton)
With newitem
.BeginGroup = True '************
.Caption = "Facteur"
.FaceId = 45
.OnAction = "Courrier"
End With
...etc...

AV
Avatar
Frédéric Sigonneau
Bonjour,


et comment insérer un menu de type msoControlSplitButtonPopup
c'est-à-dire comme le bouton des bordures ds Excel ?


La liste des types de contrôles qu'il est possible d'ajouter à un menu ou une
barre d'outils est limitée (d'après l'aide) à :

- msoControlButton
- msoControlEdit
- msoControlDropdown
- msoControlComboBox
- ou msoControlPopup

Le type msoControlSplitButtonPopup n'est donc pas disponible pour la création de
contrôles perso (peut-être dans une prochaine version d'Excel ?).

FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !

Avatar
Denis Michon
Bonjour Frédéric,

Désolé de te contredire, mais c'est parfaitement "jouable".


Essaie ceci : Dans ce cas ci , le bouton ajouté à la barre d'outils "Mise en forme" sera la "lettre A souligné" qui
apparaît habituellement dans la barre de dessin et qui permet se sélectionner une couleur pour le texte d'une cellule.

'-----------------------
Dim T As MsoControlType
T = msoControlSplitButtonPopup

Set myBar = CommandBars("Formatting").Controls.Add(T, 401)
With myBar
.Controls.Add , ID:26
End With
'-----------------------


Salutations!




"Frédéric Sigonneau" a écrit dans le message de news:
Bonjour,


et comment insérer un menu de type msoControlSplitButtonPopup
c'est-à-dire comme le bouton des bordures ds Excel ?


La liste des types de contrôles qu'il est possible d'ajouter à un menu ou une
barre d'outils est limitée (d'après l'aide) à :

- msoControlButton
- msoControlEdit
- msoControlDropdown
- msoControlComboBox
- ou msoControlPopup

Le type msoControlSplitButtonPopup n'est donc pas disponible pour la création de
contrôles perso (peut-être dans une prochaine version d'Excel ?).

FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !

Avatar
Frédéric Sigonneau
Bonjour Denis,

Tu ne me contredis nullement :)
Nous n'avons apparemment pas compris la question de la même façon.
Ta solution consiste à ajouter à une barre d'outils un bouton "tout fait"
d'Excel (du type demandé). Je n'ai pas dit que cela était impossible. Mais j'ai
compris que le demandeur (la demandeuse en l'occurrence) voulait créer son
propre bouton de ce type, et ça, ça n'a pas l'air permis...

FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !


Bonjour Frédéric,

Désolé de te contredire, mais c'est parfaitement "jouable".

Essaie ceci : Dans ce cas ci , le bouton ajouté à la barre d'outils "Mise en forme" sera la "lettre A souligné" qui
apparaît habituellement dans la barre de dessin et qui permet se sélectionner une couleur pour le texte d'une cellule.

'-----------------------
Dim T As MsoControlType
T = msoControlSplitButtonPopup

Set myBar = CommandBars("Formatting").Controls.Add(T, 401)
With myBar
.Controls.Add , ID:26
End With
'-----------------------

Salutations!

"Frédéric Sigonneau" a écrit dans le message de news:
Bonjour,


et comment insérer un menu de type msoControlSplitButtonPopup
c'est-à-dire comme le bouton des bordures ds Excel ?


La liste des types de contrôles qu'il est possible d'ajouter à un menu ou une
barre d'outils est limitée (d'après l'aide) à :

- msoControlButton
- msoControlEdit
- msoControlDropdown
- msoControlComboBox
- ou msoControlPopup

Le type msoControlSplitButtonPopup n'est donc pas disponible pour la création de
contrôles perso (peut-être dans une prochaine version d'Excel ?).

FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !



Avatar
Luce Girard
merci, c'est impec


Un truc comme ça.. :
.....
Set newitem = cbDA.Controls.Add(Type:=msoControlButton)
With newitem
.BeginGroup = True '************
.Caption = "Facteur"
.FaceId = 45
.OnAction = "Courrier"
End With
...etc...

AV


Avatar
Luce Girard
Exact, je voulais créer mon propre bouton.
Dommage...
Merci à tous les 2
Luce




Bonjour Denis,

Tu ne me contredis nullement :)
Nous n'avons apparemment pas compris la question de la même façon.
Ta solution consiste à ajouter à une barre d'outils un bouton "tout fait"
d'Excel (du type demandé). Je n'ai pas dit que cela était impossible. Mais j'ai
compris que le demandeur (la demandeuse en l'occurrence) voulait créer son
propre bouton de ce type, et ça, ça n'a pas l'air permis...

FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !


Bonjour Frédéric,

Désolé de te contredire, mais c'est parfaitement "jouable".

Essaie ceci : Dans ce cas ci , le bouton ajouté à la barre d'outils "Mise en forme" sera la "lettre A souligné" qui
apparaît habituellement dans la barre de dessin et qui permet se sélectionner une couleur pour le texte d'une cellule.

'-----------------------
Dim T As MsoControlType
T = msoControlSplitButtonPopup

Set myBar = CommandBars("Formatting").Controls.Add(T, 401)
With myBar
.Controls.Add , ID:26
End With
'-----------------------

Salutations!

"Frédéric Sigonneau" a écrit dans le message de news:
Bonjour,


et comment insérer un menu de type msoControlSplitButtonPopup
c'est-à-dire comme le bouton des bordures ds Excel ?


La liste des types de contrôles qu'il est possible d'ajouter à un menu ou une
barre d'outils est limitée (d'après l'aide) à :

- msoControlButton
- msoControlEdit
- msoControlDropdown
- msoControlComboBox
- ou msoControlPopup

Le type msoControlSplitButtonPopup n'est donc pas disponible pour la création de
contrôles perso (peut-être dans une prochaine version d'Excel ?).

FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !





Avatar
Frédo P.
Bonsoir Luce
Tu peux donner l'apparence que tu veux à ce bouton voir copier l'image d'un
bouton d'une autre application et la coller

--
Fred.

"Luce Girard" a écrit dans le message de news:

Exact, je voulais créer mon propre bouton.
Dommage...
Merci à tous les 2
Luce




Bonjour Denis,

Tu ne me contredis nullement :)
Nous n'avons apparemment pas compris la question de la même façon.
Ta solution consiste à ajouter à une barre d'outils un bouton "tout
fait"


d'Excel (du type demandé). Je n'ai pas dit que cela était impossible.
Mais j'ai


compris que le demandeur (la demandeuse en l'occurrence) voulait créer
son


propre bouton de ce type, et ça, ça n'a pas l'air permis...

FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !


Bonjour Frédéric,

Désolé de te contredire, mais c'est parfaitement "jouable".

Essaie ceci : Dans ce cas ci , le bouton ajouté à la barre d'outils
"Mise en forme" sera la "lettre A souligné" qui



apparaît habituellement dans la barre de dessin et qui permet se
sélectionner une couleur pour le texte d'une cellule.




'-----------------------
Dim T As MsoControlType
T = msoControlSplitButtonPopup

Set myBar = CommandBars("Formatting").Controls.Add(T, 401)
With myBar
.Controls.Add , ID:26
End With
'-----------------------

Salutations!

"Frédéric Sigonneau" a écrit dans le
message de news:



Bonjour,


et comment insérer un menu de type msoControlSplitButtonPopup
c'est-à-dire comme le bouton des bordures ds Excel ?


La liste des types de contrôles qu'il est possible d'ajouter à un menu
ou une



barre d'outils est limitée (d'après l'aide) à :

- msoControlButton
- msoControlEdit
- msoControlDropdown
- msoControlComboBox
- ou msoControlPopup

Le type msoControlSplitButtonPopup n'est donc pas disponible pour la
création de



contrôles perso (peut-être dans une prochaine version d'Excel ?).

FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !