Désactiver : Ajouter/Supprimer des boutons

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

pacoako

XLDnaute Occasionnel
Bonjour tout le monde!

Ma question est la suivante : Est-ce possible de désactiver la fonction Ajouter/Supprimer des boutons...(C'est la petite flèche qui est au bout de chaque toolbar ?

Ceci dans le but déviter qu'un utilisateur de mon fichier puisse créer de nouvelle barre d'outil ou de nouveau bouton et d'y affecter des macro inclu dans mon code?

Merci d'avance! =)
 
Re : Désactiver : Ajouter/Supprimer des boutons

Salut,pacoako

il y a une autre maniéré d'éviter que quelqu'un tripote dessus il faut carrément cacher la barre de menu et la remplacer par une fausse Barre de menu.

Voici le code si ça t'intéresse

Code:
'un truc peu connu : cacher la barre des menus en la remplaçant par une "fausse"
'repose sur le fait qu'Excel ne peut afficher 2 barres de menu en même temps

Sub MakeEmptyMenuBar()

Dim NewmenuBar As CommandBar

Call deleteEmptyMenuBar      'Bonne pratique

  Set NewmenuBar = CommandBars.Add(MenuBar:=True)
  With NewmenuBar
    .Name = "MyEmptyMenu"
    .Visible = True ' C'est le Truc
  End With

End Sub

Sub deleteEmptyMenuBar()
  On Error Resume Next
  CommandBars("MyEmptyMenu").Delete
  On Error GoTo 0
End Sub

'la manière classique de cacher la barre de menus d'Excel
'préférable : ne laisse pas un "vide" sous la barre de titre

Sub CacheMenu()
  Application.CommandBars("Worksheet Menu Bar").Enabled = False
End Sub

Sub MontreMenu()
  Application.CommandBars("Worksheet Menu Bar").Enabled = True
End Sub

Cordialement
 
Re : Désactiver : Ajouter/Supprimer des boutons

Ayayaye wow, c'est du solide ton truc... le problème c'est qu'à l'ouverture de mon fichier je créer ma propre CommandBar... donc je cache et disable toutes les autres... cependant.. au bout de ma commandbar il reste toujours cette petite flèche qui permet d'Ajouter/Supprimer des boutons..

J'ai trouvé comment désactive l'option Ajouter/Supprimer des boutons mais il reste toujours l'option «Personaliser...» et de la on peut ajouter et supprimer des Barres D'outil.. 🙁


jte joint le code de mon Module1... si ça peut aider à m'aider 😛

Merci encore pour ta réponse!
 

Pièces jointes

Re : Désactiver : Ajouter/Supprimer des boutons

En fait le but serait de désactiver le «Personnaliser...» accessible via cette petite flèche..

Je joint une image pour être certain qu'on se comprend 😉
 

Pièces jointes

  • personnaliser.JPG
    personnaliser.JPG
    14.2 KB · Affichages: 74
  • personnaliser.JPG
    personnaliser.JPG
    14.2 KB · Affichages: 78
  • personnaliser.JPG
    personnaliser.JPG
    14.2 KB · Affichages: 72
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
3
Affichages
432
Réponses
46
Affichages
4 K
Retour