Personnaliser ruban en fonction des feuilles

MJ13

XLDnaute Barbatruc

• 28 Avril 2014

• #2

Re : Personnaliser ruban en fonction des feuilles

Bonjour Thomasly


Je te conseille de joindre un petit fichier sans données confidentielles.

 

Vote positif 0 Vote négatif

T

thomasly@neuf.fr

XLDnaute Nouveau

• 28 Avril 2014

• #3

Re : Personnaliser ruban en fonction des feuilles

Bonjour MJ13


Ci-joint le code de création du ruban.

<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui">
<ribbon startFromScratch="false">
<tabs>
<tab id="customTab" label="TEST_RUBAN" insertBeforeMso="TabHome">
<group id="customGroup1" label="Saisie">
<button id="Ajouter" label="Ajouter" imageMso="QueryAppend" size="large" onAction="Ajouter" />
<button id="Supprimer" label="Supprimer" imageMso="RecordsDeleteRecord" size="large" onAction="Supprimer" />
<button id="Imprimer" label="Imprimer" imageMso="PrintAreaMenu" size="large" onAction="Imprimer" />
<button id="Fermer" label="fermer" imageMso="RecurrenceEdit" size="large" onAction="Fermer" />
</group>
</tab>
</tabs>
</ribbon>
</customUI>



Mon but est que quand je suis sur la feuil1, j'ai les 4 boutons.
Mais quand je change de feuille, je n'aurai plus que le bouton " Imprimer " et "Fermer" uniquement.


J'epère avoir bien exprimé le problème.

Merci de vos aides.

 

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 28 Avril 2014

• #4

Re : Personnaliser ruban en fonction des feuilles

Re

A mon avis, cela ne va pas être possible.

 

Vote positif 0 Vote négatif

T

thomasly@neuf.fr

XLDnaute Nouveau

• 28 Avril 2014

• #5

Re : Personnaliser ruban en fonction des feuilles

Re,


Merci pour ta réponse.

Si quelqu'un a une solution, je suis preneur.

 

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 28 Avril 2014

• #6

Re : Personnaliser ruban en fonction des feuilles

Re

Sinon, pour être sùr, tu peux-voir ici (mais tu dois connaître) de notre ami MichelXLD 🙂.

La personnalisation du ruban sous Excel 2007

 

Dernière édition: 28 Avril 2014

Vote positif 0 Vote négatif

G

Guest

Guest

• 28 Avril 2014

• #7

Re : Personnaliser ruban en fonction des feuilles

bonsoir,

Hello MJ🙂

@Thomas: voir fichier joint. y compris le module ThisWorkBook

A+

[Edition] il faut inverser la condition dans la macro GetEnabledButtons qui devient:

Code:

Sub GetEnabledButtons(control As IRibbonControl, ByRef Enabled)
     If control.ID = "Ajouter" Or control.ID = "Supprimer" Then
            Enabled = ActiveSheet.Name = "Feuil1"
    End If
End Sub

 

Dernière modification par un modérateur: 28 Avril 2014

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 28 Avril 2014

• #8

Re : Personnaliser ruban en fonction des feuilles

Re, Bonjour Hasco

Merci Hasco 🙂.

En tout cas sur Xl2007 😕, je ne vois rien (je vois les macros, mais pas l'onglet dans le ruban), je testerai demain sur XL2013 🙂.

Mais cela devient compliqué de programmer Excel 😱.

 

Vote positif 0 Vote négatif

G

Guest

Guest

• 28 Avril 2014

• #9

Re : Personnaliser ruban en fonction des feuilles

Re,

he oui MJ, j'ai mis une déclaration pour 2010 et oublié 2007 (gnark!!!). Je réparerai demain.


A+

[Edit] déclaration pour 2007 effectuée dans le fichier joint et celui du post#7

 

Dernière modification par un modérateur: 28 Avril 2014

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 28 Avril 2014

• #10

Re : Personnaliser ruban en fonction des feuilles

Re

Ok, cela fonctionne. Merci, c'est cool 🙂.

 

Vote positif 0 Vote négatif