Microsoft 365 Protection automatique feuilles excel

arpop · 27 Janvier 2023

Bonjour,
J'ai un fichier Excel ou chaque feuille est individuellement protégée par un mot de passe. Comment faire pour que en cas d'oubli de la re protection a la fermeture le mot de passe se remette tout seul a chaque fiche ?

Merci d'avance !

sylvanu · 27 Janvier 2023

Bonjour Titipro,
On peut mettre ça dans Thisworkbook :

VB:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Sheets("Feuil1").Protect Password:="1111"
    Sheets("Feuil2").Protect Password:="2222"
    Sheets("Feuil3").Protect Password:="3333"
    ' Sheets("xxxx").Protect Password:="aaaa"
    ActiveWorkbook.Save
End Sub

arpop · 27 Janvier 2023

sylvanu à dit:

Bonjour Titipro,
On peut mettre ça dans Thisworkbook :

VB:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Sheets("Feuil1").Protect Password:="1111"
    Sheets("Feuil2").Protect Password:="2222"
    Sheets("Feuil3").Protect Password:="3333"
    ' Sheets("xxxx").Protect Password:="aaaa"
    ActiveWorkbook.Save
End Sub

Merci beaucoup !
Ca marche nickel maintenant !!

Microsoft 365 Protection automatique feuilles excel

arpop

XLDnaute Nouveau

sylvanu

XLDnaute Barbatruc

Pièces jointes

arpop

XLDnaute Nouveau

Discussions similaires

Microsoft 365 Protection automatique feuilles excel

arpop

XLDnaute Nouveau

sylvanu

XLDnaute Barbatruc

Pièces jointes

arpop

XLDnaute Nouveau

Discussions similaires

Privacy & Transparency

Privacy & Transparency