Interdire figer/libérer les volets aux utilisateurs

[MR71]

Bonjour à tous. Je crise à chaque fois ! Mes utilisateurs libèrent les volets ! 😀
Comment peut-on leur interdire ? Sans protéger la feuille..😕
Merci Pour votre réponse

 

[Staple1600]

Re : Interdire figer/libérer les volets aux utilisateurs

Bonsoir Efgé

Plus sérieusement, si on peut interdire l'utilisation d'un "bouton" de menu, comment trouver sa référence?

Pour cela, voir du côté de Ce lien n'existe plus

ou apprendre cette liste par cœur 😀
List of ID numbers for built-in CommandBar controls in Excel 2000

 

[JNP]

Re : Interdire figer/libérer les volets aux utilisateurs

Bonsoir le fil 🙂,
Désolé Jean-Marie mais ton code ne fonctionne pas sous 2007 😛...
Un petit fil où nous avions déjoué le copier/coller via le ruban. Ce qui est intéressant, c'est que c'est lié au fichier, du coup, on ne risque pas d'oublier de rétablir la fonction avant de quitter 😀...
Bonne soirée 😎

 

[Staple1600]

Re : Interdire figer/libérer les volets aux utilisateurs

Bonsoir JNP


J'ai bien précisé pourtant

PS: test ok sous Excel 2000

Dommage que nos versions d'Excel ne soient toujours pas réapparu dans nos profils sur XLD.

 

[Efgé]

Re : Interdire figer/libérer les volets aux utilisateurs

Re au fil, Re Staple1600, bonsoir JNP;
Staple1600, JNP. Merci de vos retours, je vais voir si je comprend....😱.
Cordialement

 

[JNP]

Re : Interdire figer/libérer les volets aux utilisateurs

Re 🙂,

J'ai bien précisé pourtant
PS: test ok sous Excel 2000

J'avais bien vu, je t'informais juste que ça ne fonctionnait pas sous 2007 😉...
Bonne soirée 😎

 

[MR71]

Re : Interdire figer/libérer les volets aux utilisateurs

🙂Bonjour à tous qui avez participé à ma question qui , grâce à vous, a trouvé une réponse.
Merci au forum et à vous

 

[MR71]

Re : Interdire figer/libérer les volets aux utilisateurs

Bonjour à Staple1600, j'ai utilisé Sub Les_Volets_Clos()
CommandBars(1).Controls(9).Controls(7).Enabled=False
End Sub
mais je m'aperçois qu'aujourd'hui que j'ai remplacé False par True et que je ne récupère pas mon menu figer les volets !!!!
Merci pour l'astuce

 

[Staple1600]

Re : Interdire figer/libérer les volets aux utilisateurs

Bonjour

Pourtant cela fonctionne chez moi

Pour: Interdire figer/libérer les volets aux utilisateurs

Sub Je_Ferme_Les_Volets()
CommandBars(1).Controls(9).Controls(7).Enabled=False
End Sub

Pour ne pas : Interdire figer/libérer les volets aux utilisateurs

Sub Je_Libere_Les_Volets()
CommandBars(1).Controls(9).Controls(7).Enabled=True
End Sub

PS : en cas de problème avec les BO et les menus d'Excel
voir ici pour retrouver un Excel dans son état virginal.