Interdire Enregistrer sous

Papy Novice

Nous a quitté
Repose en paix
Bonjour le forum,
Je cherche à savoir s'il est possible d'interdire par macro le fait d'enregister sous (il s'agit d'un classeur ou pratiquement tout est interdit) sauf ce qui est permis de faire au sein de celui-ci.
En vous remerciant pour votre intervention et vous souhaitant un bon dimanche.
Jean
 
P

Papy Novice

Guest
onjour MichelXld, titi
Tout d'abord, merci Michel pour le fil que tu me communique et qui, je n'en doute pas, me donnera satisfaction.
Pour répondre à titi, je protège normalement ma feuille et libère les cellules sur lesquelles une modif est permise par Format, Cellule, Protection.
Puis j'attribue un mot de passe différents à chaque feuille (nom de la feuille suivi d'un code commun.
J'interdit le copier coller des feuilles :
Dans le module de la feuille (cliquer sur l'onglet et faire visualiser le code)
Private Sub Worksheet_Deactivate()
Application.CutCopyMode = False
End Sub
Sur le module du classeur : dans VBA project double cliquer sur thisworkbook.
Private Sub Workbook_WindowDeactivate(ByVal Wn As Window)
Application.CutCopyMode = False
End Sub
Enfin, je protège le classeur à l'aide de macros Mots de passe à 3 niveaux confectionné par _Thierry (USF-PassWord-Multi-Levels-V01.00.xls) téléchargeable sur le site.
Espérant avoir répondu à ta question, je te souhaite un bon dimanche et une EXCELlente semaine (je ne crie pas)
Jean
 

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
314 450
Messages
2 109 726
Membres
110 552
dernier inscrit
jasson