renseignements clic droit

  • Initiateur de la discussion Initiateur de la discussion zumye
  • Date de début Date de début

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 !

zumye

XLDnaute Occasionnel
bonjour
quelqu'un peut m'expliquer comment avec ce programme je peux interdire le clic droit sur les onglets:

'Pour désactiver le menu clic droit sur onglet
Application.CommandBars("ply").Enabled = False

'Pour le rétablir
Application.CommandBars("Ply").Enabled = True

c'est quoi "ply"?
comment dois la faire marcher, ou la poser?
merci
 
Re : renseignements clic droit

Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Pour le rétablir
Application.CommandBars("Ply").Enabled = True

End Sub

Private Sub Workbook_Open()
'Pour désactiver le menu clic droit sur onglet
Application.CommandBars("ply").Enabled = False

End Su
 
Re : renseignements clic droit

et bien JCGL ca marche bien sur le fichier zip, j'ai reproduit la meme chose mais ca ne marche pas. mais je crois que je ne comprend pas comment on actionne et comment on rétabli, par exemple sur le fichier zip je ne sais pas comment on retabli le clic droit
merci
 
Re : renseignements clic droit

Re,

Place ce code dans le ThisWorkBook de TON FICHIER :

Code:
Option Explicit

Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Pour le rétablir
Application.CommandBars("Ply").Enabled = True
End Sub

Private Sub Workbook_Open()
'Pour désactiver le menu clic droit sur onglet
Application.CommandBars("Ply").Enabled = False
End Sub
ICI :



Avec le code, ainsi placé, le clic droit est impossible sur ce fichier.
Si tu souhaites pouvoir Interdire et Autoriser, le code sera un peu différent et placé ailleurs

A+
 
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
4
Affichages
155
Réponses
3
Affichages
452
Réponses
1
Affichages
398
Retour