protection fichier en vba

[Dominic67]

Bonsoir

Je cherche un moyen de proteger un fichier en vba, en somme je travaille sur une feuille et lors de la sauvegarde je fais une protection de la feuille sans mot de passe.
Mon idée est de proteger la feuille par un mot de passe et ceci en automatique sans que celui ci soit demander à chaque sauvegarde. Comme il y aura plusieurs utilisateurs de ce programme, je ne voudrais pas qu'une personne quelqu'elle soit puisse deproteger la feuille en passant Outils -> protection proteger la feuille.

Merci pour votre aide

 

[Eric]

Tu peux essayer ceci........


Sub Workbook_beforesave _
(ByVal saveasui As Boolean, cancel As Boolean)


Worksheets('Sheet1').Protect Password:='TonMotDePasse'

End Sub