Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

[VBA] personnaliser le ruban et la barre d'accès rapide

6 réponses
Avatar
JièL
Salutatousses

bon, encore un truc qui doit bien exister mais que je ne trouve pas...

Avez vous 1 (des) exemple(s) de personnalisation du ruban et de la barre
d'accès rapide avec des macros perso, le tout via VBA (pas à la main)
pour Excel 2010/2013 sans devoir écrire du XML ?

Merci d'avance

--
JièL père so-nalizeur

6 réponses

Avatar
isabelle
bonjour JièL,

voici un exemple pour ajouter 2 macros dans la section "Barres d'outils
personnalisées" de l'onglet "Complément"
j'ai fais le test sur xl2010.

Sub auto_open()
test
End Sub

Sub test()
Dim barre As CommandBar
Dim bouton As CommandBarControl
Set barre = CommandBars.Add(Name:="BarreBoutons")
barre.Visible = True

Set bouton = CommandBars("BarreBoutons").Controls.Add(Type:=msoControlButton)
bouton.Style = msoButtonCaption
bouton.OnAction = "Macro1"
bouton.Caption = "Macro1"

Set bouton = CommandBars("BarreBoutons").Controls.Add(Type:=msoControlButton)
bouton.Style = msoButtonCaption
bouton.OnAction = "Macro2"
bouton.Caption = "Macro2"
End Sub

Sub macro1()
MsgBox "Macro1"
End Sub

Sub macro2()
MsgBox "Macro2"
End Sub

isabelle

Le 2015-11-06 14:07, JièL a écrit :
Salutatousses

bon, encore un truc qui doit bien exister mais que je ne trouve pas...

Avez vous 1 (des) exemple(s) de personnalisation du ruban et de la barre d'accès
rapide avec des macros perso, le tout via VBA (pas à la main) pour Excel
2010/2013 sans devoir écrire du XML ?

Merci d'avance

Avatar
isabelle
pour l'ajout sur la barre d'accès, c'est pas gagné, code xml uniquement
déjà, juste pour le choix d'une icone perso pour ta macro est assez compliqué
(code xml), voir ici:
http://forum.excel-pratique.com/excel/personnaliser-la-barre-d-outils-acces-rapide-excel-2007-t3497.html

si tu change d'idée pour le code xml, il y a un bon tuto ici:
http://silkyroad.developpez.com/excel/callbacks/
et
https://msdn.microsoft.com/fr-fr/library/ms406046(v=office.12).aspx

isabelle
Avatar
isabelle
...pour le déploiement de l’interface utilisateur pour un grand nombre
d’utilisateurs c'est une autre histoire...
https://msdn.microsoft.com/fr-fr/library/office/ee704589(v=office.14).aspx#odc_office14_DeployCustomRibbon_UsingAdministrativePoliciesRestrictUICustomizations
isabelle

Le 2015-11-06 21:49, isabelle a écrit :
pour l'ajout sur la barre d'accès, c'est pas gagné, code xml uniquement
déjà, juste pour le choix d'une icone perso pour ta macro est assez compliqué
(code xml), voir ici:
http://forum.excel-pratique.com/excel/personnaliser-la-barre-d-outils-acces-rapide-excel-2007-t3497.html


si tu change d'idée pour le code xml, il y a un bon tuto ici:
http://silkyroad.developpez.com/excel/callbacks/
et
https://msdn.microsoft.com/fr-fr/library/ms406046(v=office.12).aspx

isabelle
Avatar
isabelle
pour terminer, j'ai retrouvé les articles publiés en mai 2006 lors de la
transition. bonne lecture!
(Part 1 of 3) https://msdn.microsoft.com/fr-fr/library/aa338202.aspx
(Part 2 of 3) https://msdn.microsoft.com/en-us/library/aa338199(v=office.12).aspx
(Part 3 of 3) https://msdn.microsoft.com/en-us/library/aa722523(v=office.12).aspx

isabelle


Le 2015-11-06 21:49, isabelle a écrit :
pour l'ajout sur la barre d'accès, c'est pas gagné, code xml uniquement
déjà, juste pour le choix d'une icone perso pour ta macro est assez compliqué
(code xml), voir ici:
http://forum.excel-pratique.com/excel/personnaliser-la-barre-d-outils-acces-rapide-excel-2007-t3497.html


si tu change d'idée pour le code xml, il y a un bon tuto ici:
http://silkyroad.developpez.com/excel/callbacks/
et
https://msdn.microsoft.com/fr-fr/library/ms406046(v=office.12).aspx

isabelle
Avatar
isabelle
désolé si ceux-ci sont uniquement en grand breton, j'ai essayé avec fr-fr et
fr-ca mais on est automatiquement renvoyé à en-us
isabelle

Le 2015-11-06 22:14, isabelle a écrit :
pour terminer, j'ai retrouvé les articles publiés en mai 2006 lors de la
transition. bonne lecture!
(Part 1 of 3) https://msdn.microsoft.com/fr-fr/library/aa338202.aspx
(Part 2 of 3)
https://msdn.microsoft.com/en-us/library/aa338199(v=office.12).aspx
(Part 3 of 3)
https://msdn.microsoft.com/en-us/library/aa722523(v=office.12).aspx

isabelle
Avatar
JièL
Merci BEAUCOUP Isabelle... Comme le disait notre regretté JPS : tu es un
ange.

--
JièL angélizé

Le 07/11/2015 04:23, isabelle a écrit :
désolé si ceux-ci sont uniquement en grand breton, j'ai essayé avec
fr-fr et fr-ca mais on est automatiquement renvoyé à en-us
isabelle

Le 2015-11-06 22:14, isabelle a écrit :
pour terminer, j'ai retrouvé les articles publiés en mai 2006 lors de la
transition. bonne lecture!
(Part 1 of 3) https://msdn.microsoft.com/fr-fr/library/aa338202.aspx
(Part 2 of 3)
https://msdn.microsoft.com/en-us/library/aa338199(v=office.12).aspx
(Part 3 of 3)
https://msdn.microsoft.com/en-us/library/aa722523(v=office.12).aspx

isabelle