Protéger un classeur avec une macro

Armarm

XLDnaute Nouveau
Bonjour à tous,

J'ai un fichier dont tout le monde se sert dans l'entreprise. Mais seulement certaines personnes peuvent le modifier et les autres peuvent le consulter en lecture seule. J'ai essayer de mettre un mot de passe à l'ouverture, certes cela marche mais comme c'est un fichier partager la macro du timer pour fermeture d'inactivité ne fonctionne pas. Donc j'aimerais un code VBA qui dés que l'on veut apporter une modification sur le fichier celui ci demande un mot de passe.

Merci d'avance .
 

vgendron

XLDnaute Barbatruc
Hello

peut etre en ajouttant le control de mot de passe avant la fermeture du fichier..??
VB:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Pass = Application.InputBox("Donnez le mot de passe")
If Pass <> "PassWord" Then
    MsgBox ("ce mot de passe n'est pas le bon, le fichier va etre fermé sans enregistrer les modifications effectuées")
    ActiveWorkbook.Close savechanges:=False
End If
End Sub

bien.. sur.. un petit malin va enregistrer le fichier avant de le fermer..
donc.. il faudra aussi mette ce control de mot de passe dans l'évènement change..

et suis quasi sur qu'il pourra aller voir le mot de passe écrit en dur dans le code...

sinon, il y a sans doute un moyen (plus sur) d'ouvrir le fichier en lecture seule TOUT en autorisant l'exécution de tes macros..
mais ca.. sans ton fichier...
 

Discussions similaires

Statistiques des forums

Discussions
312 884
Messages
2 093 242
Membres
105 658
dernier inscrit
Mario Richard