XL 2016 désactiver la possibilté de copier

[linebich]

Bonjour les gens , s'il vous plait comment est ce que je peux désactiver la possibilité d'utiliser copier et couper soit par tabulation soit par menu
et ceci via une macros sur le classeur

 

[GALOUGALOU]

bonjour linebich bonjour le forum
en vba
dans molule 1 un code
dans evenement classeur un code
cordialement
galougalou

 

[Staple1600]

Bonjour le fil, linebich, GALOUGALOU

=>linebich
Poser des questions, c'est bien
Se manifester par un petit retour dans la précédente, c'est mieux 😉

XL 2016 - proteger une plage

Bonsoir , mon objectif c'est d'oter la protection pendant l'execution de mon programme et proteger apres mais la protection doit couvrir juste une plage de colonne de B à J j'usqu'au derniere ligne avec une possibilité de faire tout sauf la modification de contenu j'ai essayé avec ce code mais...

www.excel-downloads.com

(En tout cas, c'est apprécié par ceux qui déposent conseils, macros et formules)

Pour infos: Il suffit d'ouvrir ton classeur en désactivant les macros, pour pouvoir copier/coller.

 

[Eric C]

Bonsoir le forum
Bonsoir linebich (tiens compte de la remarque de notre ami Staple, merci), GALOUGALOU, Staple

@ GALOUGALOU. L'utilisateur pourra toujours user des fonctions du "ruban Excel" qui semblerait ne pas être désactivées.
Bonne soirée

 

[GALOUGALOU]

ahhhh oui j'ai oublié le ruban bien vue eric c
une manière de supprimer l'option
supprimer le presse papier du ruban

Bonjour Pour supprimer le Presse papier du ruban: Se rendre dans les Options d’Excel (Fichier>Options) Dans Personnaliser le ruban, sélectionner Presse-Papiers sous l’onglet Accueil, et cliquer sur Supprimer [image] Résultat: [image] Plus de presse papiers, copier/coller devient impossible.
cordialement
galougalou

 

[Staple1600]

Bonsoir à toi aussi GALOUGALOU... 🙄

=> Pour infos
Ouvrez le classeur sans activer les macros
(pour éviter le côté liberticide 😉)
Et pour le Ruban , faire l'inverse
Au lieu de cliquer sur Supprimer , cliquer sur Ajouter

NB: L'utilisateur final est censé rester libre d'utiliser l'Excel installé sur son PC, non ?
Car la personnalisation du Ruban impactera tous les classeurs.

 

[GALOUGALOU]

bonjour le forum
une autre solution préférable au différent post qui précéde

à placer dans le module de la feuille et adapter les colonnes

Dim NoCopCol As Boolean

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Union(Me.Columns("A:B"), Me.Columns("C😀"))) _
Is Nothing Then
Application.CutCopyMode = False
NoCopCol = True
Else
If NoCopCol Then Application.CutCopyMode = False
NoCopCol = False
End If
End Sub

cordialement galougalou

 

[Staple1600]

Bonjour le fil, GALOUGALOU (tu ne salues pas quand on te salue?)

=>Pour infos
Cette solution qu'elle soit préférable ou pas sera tout aussi inefficace puisqu'Excel permet d'ouvrir un classeur sans activer les macros
(Je ne parle même pas de la possibilité de l'ouvrir dans Libre Office)

 

[GALOUGALOU]

désolé staple 1600
je manque au minimum, éffectivement j'aurais du te saluer, désolé
effectivement si on maitrise excel et l'informatique on peut toujours contourner toutes les protections
cordialement galougalou

 

[Staple1600]

Re

J'ai posté le message surtout pour le demandeur
Pour le prévenir, que si son classeur contient des données sensibles, la protection qu'offre Excel sera illusoire.
Mieux vaut le savoir avant 😉