Comment interdire le copier-coller d'onglet ?

  • Initiateur de la discussion Initiateur de la discussion marmotte18
  • 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 !

marmotte18

XLDnaute Impliqué
Bonjour,

Supposons que je ne dispose que de Feuil1

  • Clique droit sur l'onglet "Feuil1"
  • Clique sur l'option "déplacer ou copier"
  • Coche la case "Créer une copie"
  • clique sur le bouton "ok"
Je souhaiterai avoir un code VBA qui interdise cette fonctionnalité tout en laissant visible l'ensemble des onglets.

Vous trouverez ci-joint un fichier qui avait la prétention d'interdire toutes formes de copier-coller. Malheureusement, la possibilité détaillée ci-dessus est passée à travers.

Merci par avance !
 

Pièces jointes

Re : Comment interdire le copier-coller d'onglet ?

Bonjour Marmotte
La protection du classeur interdit l'ajout, suppression, déplacement et renommage d'onglets : cela pourait-il répondre à ton objectif ?

PS : ActiveWorkbook.Protect Structure:=True, Password:="toto"
 
Dernière édition:
Re : Comment interdire le copier-coller d'onglet ?

Bonjour Marmotte, Chris

ci dessous ligne de code à rajouter dant l'évènement "open" de "ThisWorkbook", pour protéger le classeur comme l'a indiqué Chris.

Code:
ThisWorkbook.Protect "toto"

bon dimanche.
@+
 
Re : Comment interdire le copier-coller d'onglet ?

Bonjour Marmotte, Chris

Ci joint une démo trouvée sur le net Auteur ???? (qu'il veuille bien m'excuser)


le 19/5/07: l'auteur est Denis Michon sur excelabo.net. merci à lui
 
Dernière édition:
Re : Comment interdire le copier-coller d'onglet ?

Bonjour Michel
Redoutable ce code !
La colle n'existe plus !
J'avais proposé quelque chose à Marmotte sur des fils précédents.
Je garde ce code bien qu'il soit complexe (pour ma comprenette).
Bon dimanche
 
- 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
Retour