Discussion:
Configuration des tabulations ribbon
(trop ancien pour répondre)
Nicolas
2020-05-13 12:47:40 UTC
Permalink
Bonjour à tous,

J'utilise depuis peu les contrôles "Ribbon" et je suis bloqué devant la situation suivante :

j'ai configuré une tabulation/Ribbon nommée "Publique", dans un fichier "Ribbon_Publique.xlam" et qui est accessible depuis tous les fichiers ouverts, à exception, et c'est bien là mon problème, du fichier "MonFichier.xlsm".

Le fichier "MonFichier.xlsm" contient lui même sa propre tabulation/Ribbon nommée "MonFichier", qui n'est visible que si je me situe sur ce fichier, se qui est correct pour moi.

Cependant, depuis le fichier "MonFichier.xlsm" la tabulation/Ribbon "Publique" est invisible, elle apparaît bien cependant, depuis tous les autres fichiers ouverts.

***configuration xml de "Publique" ***
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<customUI onLoad="RibbonOnLoad" xmlns="http://schemas.microsoft.com/office/2006/01/customui">

<ribbon>

<tabs>

<tab id="PubliqueTab_Id" label="Publique" insertBeforeMso="TabHome" getVisible="GetVisible" tag="PubliqueTab" >

...

***configuration xml de "MonFichier" ***
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<customUI onLoad="RibbonOnLoad" xmlns="http://schemas.microsoft.com/office/2006/01/customui">

<ribbon>

<tabs>

<tab id="MonFichierTab_Id" label="MonFichier" insertBeforeMso="TabHome" getVisible="GetVisible" tag="MonFichierTab" >

...

Dans chacun des 2 fichiers nommés précédemment, il y a un module "RibbonModule" qui contient les procédures de lancement et modification de la tabulation/Ribbon :

Dim Rib As IRibbonUI
Public MyTag As String

Sub RibbonOnLoad(ribbon As IRibbonUI)

Set Rib = ribbon

End Sub

Sub RefreshRibbon(Tag As String)

MyTag = Tag
If Rib Is Nothing Then
'MsgBox "Error, Save/Restart your workbook"
Application.StatusBar = "Error"
Else
Rib.Invalidate
End If

End Sub

Sub GetVisible(control As IRibbonControl, ByRef visible)
On Error Resume Next

...

End sub

***

J'ai essayé de changer dans le module "RibbonModule" de "MonFichier.xlsm" :
- la valeur "RibbonOnLoad" para "RibbonOnLoad2"
- la valeur "Rib", par "Rib2",
- la valeur "ribbon", par "ribbon2",
- la valeur "control", par "control2",
Dans le code xml :
- la valeur "RibbonOnLoad" para "RibbonOnLoad2"
- la valeur standalone=yes para standalone=no
- La position de la tab "insertBeforeMso", par "insertAfterMso".

mais rien n'y fait, les 2 tabulation/Ribbon fonctionnent "correctement", cependant je ne vois toujours pas ma tabulation/Ribbon "Publique" lorsque je suis sur "Monfichier.xlsm".

Je vous remercie d'avance pour toute l'aide que vous pourriez m'apporter.

À bientôt
MichD
2020-05-13 14:54:31 UTC
Permalink
Bonjour,

Personnellement, je n'interviens pas sur les questions de programmation
du ruban d'Excel. Cependant, tu as presque tout sur ce sujet sur ce site
internet (en anglais) : https://www.rondebruin.nl/win/section2.htm

MichD
Nicolas
2020-05-13 15:28:52 UTC
Permalink
Merci pour ton aide MichD,

Je vais consulter ce site et essayer de trouver une solution a mon problème.

A bientôt
Péhemme
2020-05-14 13:44:27 UTC
Permalink
Bonjour Nicolas,

Question stupide :
Ton fichier .xlam est-il bien coché dans : Développeur/Compléments ?
Sans quoi je ne vois pas.
Un fichier xlam reste accessible par son onglet personnalisé quels que
soient les fichiers .xlsm ouverts.
Michel


"Nicolas" a écrit dans le message de groupe de discussion :
b283d6df-1181-4d00-8fa9-***@googlegroups.com...

Bonjour à tous,

J'utilise depuis peu les contrôles "Ribbon" et je suis bloqué devant la
situation suivante :

j'ai configuré une tabulation/Ribbon nommée "Publique", dans un fichier
"Ribbon_Publique.xlam" et qui est accessible depuis tous les fichiers
ouverts, à exception, et c'est bien là mon problème, du fichier
"MonFichier.xlsm".

Le fichier "MonFichier.xlsm" contient lui même sa propre tabulation/Ribbon
nommée "MonFichier", qui n'est visible que si je me situe sur ce fichier, se
qui est correct pour moi.

Cependant, depuis le fichier "MonFichier.xlsm" la tabulation/Ribbon
"Publique" est invisible, elle apparaît bien cependant, depuis tous les
autres fichiers ouverts.

***configuration xml de "Publique" ***
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<customUI onLoad="RibbonOnLoad"
xmlns="http://schemas.microsoft.com/office/2006/01/customui">

<ribbon>

<tabs>

<tab id="PubliqueTab_Id" label="Publique" insertBeforeMso="TabHome"
getVisible="GetVisible" tag="PubliqueTab" >

...

***configuration xml de "MonFichier" ***
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<customUI onLoad="RibbonOnLoad"
xmlns="http://schemas.microsoft.com/office/2006/01/customui">

<ribbon>

<tabs>

<tab id="MonFichierTab_Id" label="MonFichier"
insertBeforeMso="TabHome" getVisible="GetVisible" tag="MonFichierTab" >

...

Dans chacun des 2 fichiers nommés précédemment, il y a un module
"RibbonModule" qui contient les procédures de lancement et modification de
la tabulation/Ribbon :

Dim Rib As IRibbonUI
Public MyTag As String

Sub RibbonOnLoad(ribbon As IRibbonUI)

Set Rib = ribbon

End Sub

Sub RefreshRibbon(Tag As String)

MyTag = Tag
If Rib Is Nothing Then
'MsgBox "Error, Save/Restart your workbook"
Application.StatusBar = "Error"
Else
Rib.Invalidate
End If

End Sub

Sub GetVisible(control As IRibbonControl, ByRef visible)
On Error Resume Next

...

End sub

***

J'ai essayé de changer dans le module "RibbonModule" de "MonFichier.xlsm" :
- la valeur "RibbonOnLoad" para "RibbonOnLoad2"
- la valeur "Rib", par "Rib2",
- la valeur "ribbon", par "ribbon2",
- la valeur "control", par "control2",
Dans le code xml :
- la valeur "RibbonOnLoad" para "RibbonOnLoad2"
- la valeur standalone=yes para standalone=no
- La position de la tab "insertBeforeMso", par "insertAfterMso".

mais rien n'y fait, les 2 tabulation/Ribbon fonctionnent "correctement",
cependant je ne vois toujours pas ma tabulation/Ribbon "Publique" lorsque je
suis sur "Monfichier.xlsm".

Je vous remercie d'avance pour toute l'aide que vous pourriez m'apporter.

À bientôt
Nicolas
2020-05-15 09:16:16 UTC
Permalink
Bonjour Michel,

Mon fichier .xlam n´était pas coché dans : Développeur/Compléments.

À titre d'essai, et pour suivre ta recommandation, je l'ai placé dans le répertoire :
"C:\Users\nicolas\AppData\Roaming\Microsoft\AddIns",

et j'ai coché la case "Développeur/Compléments".

Maintenant il s'exécute directement à l'ouverture d'Excel,
mais le problème persiste, lorsque j'ouvre "MonFichier.xlsm", mon onglet "Publique" disparaît et est remplacé par l'onglet "MonFichier".

Mais si je change dans le code xml du fichier "Ribbon_Publique.xlam", le code :

<tab id="PubliqueTab_Id" label="Publique" insertBeforeMso="TabHome" getVisible="GetVisible" tag="PubliqueTab" >

par le code :

<tab id="PubliqueTab_Id" label="Publique" insertBeforeMso="TabHome" >

L'onglet ne disparaît plus (je vois bien les 2 onglets en même temps), mais les contrôles de l'onglet "Publique" n'y sont plus et l'onglet "MonFichier" fonctionne correctement.

Merci Michel pour ton aide.
Péhemme
2020-05-15 11:07:24 UTC
Permalink
Bonjour Nicolas,
répertoire : "C:\Users\nicolas\AppData\Roaming\Microsoft\AddIns",
Correct
et j'ai coché la case "Développeur/Compléments"
Correct
lorsque j'ouvre "MonFichier.xlsm", mon onglet "Publique" disparaît et est
remplacé par l'onglet "MonFichier".
Je ne comprends pas.
Qu'entends-tu par disparaître ?
Quand ton fichier "MonFichier.xlsm" est chargé, tes 2 onglets "Publique"
doivent apparaître sur la même ligne que Fichier-Accueil-Insertion-.....
Développeur.
Personnellement, je n'utilise jamais les instructions XML "GetVisible" ni
le "Tag".
À titre d'exemple dans le XML de d'un fichier .xlsm j'écris (je suis sous
W7 - Excel 2010) :
<customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui"
onLoad="rx_RubanCharge">
<ribbon startFromScratch="false" >
<tabs>
<tab id="Tab_Cycles" label="Cycles et Dates" >
reste de ton ruban
</tab>
</tabs>
</ribbon>
....

et dans un Module :
'Déclaration du Ruban
Public monRuban As IRibbonUI
Puis pour charger le ruban lors de l'ouverture du fichier .xlsm :
'Callback for customUI.onLoad
Sub rx_RubanCharge(ribbon As IRibbonUI)
Set monRuban = ribbon
monRuban.ActivateTab "Tab_Cycles"
End Sub

Ainsi,
1°) quand tu ouvres Excel, ton fichier .xlam est chargé automatiquement et
son onglet "Publique" apparaît dans la barre des onglets.
De là tu as, à loisir, accès à tes contrôles comme tu le ferais avec :
Accueil ou Révision ou tout autre onglet.
2°) maintenant tu ouvres ton fichier normal (.xlsm) :
là ton onglet "Publique" attaché à celui-ci apparaît également dans la barre
des onglets.
L'accès aux différents boutons de contrôle y attachés se fait de la même
façon que pour las autres contrôles de n'importe quel autre onglet ; rien ne
"disparaît".

Je te confirme : je n'ai pas compris.
;-))
Au besoin mets ton fichier sur cjoint et transmets-nous le lien.
Michel

"Nicolas" a écrit dans le message de groupe de discussion :
b393a5b0-fa8c-4347-b319-***@googlegroups.com...

Bonjour Michel,

Mon fichier .xlam n´était pas coché dans : Développeur/Compléments.

À titre d'essai, et pour suivre ta recommandation, je l'ai placé dans le
répertoire :
"C:\Users\nicolas\AppData\Roaming\Microsoft\AddIns",

et j'ai coché la case "Développeur/Compléments".

Maintenant il s'exécute directement à l'ouverture d'Excel,
mais le problème persiste, lorsque j'ouvre "MonFichier.xlsm", mon onglet
"Publique" disparaît et est remplacé par l'onglet "MonFichier".

Mais si je change dans le code xml du fichier "Ribbon_Publique.xlam", le
code :

<tab id="PubliqueTab_Id" label="Publique" insertBeforeMso="TabHome"
getVisible="GetVisible" tag="PubliqueTab" >

par le code :

<tab id="PubliqueTab_Id" label="Publique" insertBeforeMso="TabHome" >

L'onglet ne disparaît plus (je vois bien les 2 onglets en même temps), mais
les contrôles de l'onglet "Publique" n'y sont plus et l'onglet "MonFichier"
fonctionne correctement.

Merci Michel pour ton aide.
Nicolas
2020-05-17 18:10:22 UTC
Permalink
Bonjour Michel,

tu trouveras ici les 2 fichiers dont je parles:
- https://www.cjoint.com/c/JErrNAFIRHQ : Ribbon_Publique.xlam
- https://www.cjoint.com/c/JErrRmdakBQ : MonFichiers.xlsm

J'utilise les Tag, afin de pouvoir accéder aux différentes options des onglets selon mes besoins.

Lorsque j'ouvre "MonFichier.xlsm" l'onglet "publique" ne se voit plus, et c'est bien là mon problème, et est comme remplacé par l'onglet "MonFichier" qui est lui exclusivement associé à ce dernier fichier.

Si je me déplace sur un autre fichier, je peux à nouveau accéder à mon onglet "Publique".

J'utilise Excel 2013-2016.

Merci encore Michel, pour ton aide.

À bientôt

Nicolas
MichD
2020-05-17 20:23:27 UTC
Permalink
Bonjour,

Une suggestion : Regarde la vidéo à cette adresse : (en anglais)
Désolé, je n'ai pas trouvé la version chinoise! ;-)

https://www.youtube.com/watch?reload=9&v=AhnOU-ulqNg

MichD
Péhemme
2020-05-18 08:28:15 UTC
Permalink
Bonjour Nicolas,
Post by Nicolas
Lorsque j'ouvre "MonFichier.xlsm" l'onglet "publique" ne se voit plus, et
c'est bien là mon problème, et est comme remplacé par l'onglet
"MonFichier" qui est lui exclusivement associé à ce dernier fichier.
Je ne reproduis pas chez moi (W7 - Excel 2010) ton problème.
J'ai chargé ton fichier .xlam puis chargé ton "MonFichier.xlsm" et j'ai bien
les 2 onglets disponibles.
Les contrôles attachés à chacun des onglets ne sont naturellement
accessibles que si tu appelles (clique sur) l'onglet concerné.
En revanche, l'onglet attaché à ton fichier "MonFichier.xlsm" n'apparait que
lorsque celui-ci est activé. Par exemple si tu ouvres un autre fichier de
travail, l'onglet "MonFichier" disparait, mais celui nommé "Publique" (ton
.xlam) demeure (c'est le propre des .xlam).

En d'autres termes, ton onglet "Publique" est chez moi toujours apparent
tandis que que ton onglet "MonFichier" n'apparait que lorsque ton fichier
"MonFichier.xlsm" est activé.
Ceci est le comportement normal d'Excel, c'est la raison pour laquelle je ne
comprends pas que tu obtiennes le résultat inverse.
N'as-tu pas inversé les extensions ?

Je suis désolé de ne pas pouvoir faire plus à ce niveau.
Bien amicalement
Michel


"Nicolas" a écrit dans le message de groupe de discussion :
373bd942-61ff-4d57-9138-***@googlegroups.com...

Bonjour Michel,

tu trouveras ici les 2 fichiers dont je parles:
- https://www.cjoint.com/c/JErrNAFIRHQ : Ribbon_Publique.xlam
- https://www.cjoint.com/c/JErrRmdakBQ : MonFichiers.xlsm

J'utilise les Tag, afin de pouvoir accéder aux différentes options des
onglets selon mes besoins.

Lorsque j'ouvre "MonFichier.xlsm" l'onglet "publique" ne se voit plus, et
c'est bien là mon problème, et est comme remplacé par l'onglet "MonFichier"
qui est lui exclusivement associé à ce dernier fichier.

Si je me déplace sur un autre fichier, je peux à nouveau accéder à mon
onglet "Publique".

J'utilise Excel 2013-2016.

Merci encore Michel, pour ton aide.

À bientôt

Nicolas
Péhemme
2020-05-18 15:22:25 UTC
Permalink
Exact Nicolas,
Ta gestion de tes 'visible' n'est pas au point dans ton fichier
"Ribbon-Publique".
Je n'avais pas testé tes contrôles.
En effet, lorsque tu utilises le ruban de "Monfichier" et que tu reviens sur
un contrôle de "Publique", ce dernier 'disparaît' (n'est plus visible bien
qu'il soit toujours chargé dans Excel).
Afin de palier cette difficulté je te suggère d'utiliser des SplitButton
dans ton XML au lieu de gérer des 'getvisible'.

Par exemple :
https://www.cjoint.com/c/JEsptzl7KQY
et :
https://www.cjoint.com/c/JEspr2s6MfY

Michel




"Nicolas" a écrit dans le message de groupe de discussion :
373bd942-61ff-4d57-9138-***@googlegroups.com...

Bonjour Michel,

tu trouveras ici les 2 fichiers dont je parles:
- https://www.cjoint.com/c/JErrNAFIRHQ : Ribbon_Publique.xlam
- https://www.cjoint.com/c/JErrRmdakBQ : MonFichiers.xlsm

J'utilise les Tag, afin de pouvoir accéder aux différentes options des
onglets selon mes besoins.

Lorsque j'ouvre "MonFichier.xlsm" l'onglet "publique" ne se voit plus, et
c'est bien là mon problème, et est comme remplacé par l'onglet "MonFichier"
qui est lui exclusivement associé à ce dernier fichier.

Si je me déplace sur un autre fichier, je peux à nouveau accéder à mon
onglet "Publique".

J'utilise Excel 2013-2016.

Merci encore Michel, pour ton aide.

À bientôt

Nicolas
Nicolas
2020-05-18 20:46:30 UTC
Permalink
Merci à tous les deux pour votre aide et votre temps,

J'ai vu et "tâché" de suivre au mieux le tutoriel, mais j'ai la sensation que le "problème" ne se situe pas au niveau des permis, mais plutôt au niveau de la fonction getvisible, encore que étant assez novice en la matière, je n’exclurai aucune hypothèse.

Il me "coûte" cependant de renoncer à la fonction "getvisible", si par là, je dois renoncer également à la manière dont je souhaiterais activer les différentes options de l'onglet, qui bien que pré-configurées, se déploient, à l'horizontale de façon dynamique, comme dans l'exemple que je vous est envoyé : Menu, sous-menu, ...

¿ Quelle est la fonction du code : startFromScratch="false" ?

Merci encore pour votre inestimable aide.

Nicolas
Péhemme
2020-05-19 08:40:55 UTC
Permalink
Bonjour Nicolas,
Post by Nicolas
¿ Quelle est la fonction du code : startFromScratch="false" ?
Si tu mets <ribbon startFromScratch="true" > , tu masques tous les onglets
au chargement de ton fichier ; seul le ruban de ton fichier est apparent.

Bien qu'il date un peu, tu as un excellent tuto :
https://silkyroad.developpez.com/excel/ruban/

Bon courage
Michel


"Nicolas" a écrit dans le message de groupe de discussion :
bcdcdb3a-622b-4bd9-89dd-***@googlegroups.com...

Merci à tous les deux pour votre aide et votre temps,

J'ai vu et "tâché" de suivre au mieux le tutoriel, mais j'ai la sensation
que le "problème" ne se situe pas au niveau des permis, mais plutôt au
niveau de la fonction getvisible, encore que étant assez novice en la
matière, je n’exclurai aucune hypothèse.

Il me "coûte" cependant de renoncer à la fonction "getvisible", si par là,
je dois renoncer également à la manière dont je souhaiterais activer les
différentes options de l'onglet, qui bien que pré-configurées, se déploient,
à l'horizontale de façon dynamique, comme dans l'exemple que je vous est
envoyé : Menu, sous-menu, ...

¿ Quelle est la fonction du code : startFromScratch="false" ?

Merci encore pour votre inestimable aide.

Nicolas
Nicolas
2020-05-20 07:10:43 UTC
Permalink
Bonjour Michel et encore merci pour ton aide.

À bientôt

Nicolas

Loading...