A l'ouverture du classeur, la feuille Excel est protégée.
Au cours de la macro lancée via un Userform, la protection doit être ôtée, puis remise en fin de traitement.
Comment faire ?
En debut de macro : Activesheet.Unprotect Password:="toto" En fin de macro : Activesheet.Protect Password:="toto"
-- JLuc
Jacky
Bonsoir, Ceci peut-être '----------- Private Sub UserForm_Activate() ActiveSheet.Unprotect Password:="toto" End Sub '------------- Private Sub UserForm_Deactivate() ActiveWorkbook.Protect Password:="toto" End Sub '--------- Salutations JJ "Yvan" a écrit dans le message de news:
Bonjour,
A l'ouverture du classeur, la feuille Excel est protégée.
Au cours de la macro lancée via un Userform, la protection doit être ôtée, puis remise en fin de traitement.
Comment faire ? -- Merci pour vos réponses.
Bonsoir,
Ceci peut-être
'-----------
Private Sub UserForm_Activate()
ActiveSheet.Unprotect Password:="toto"
End Sub
'-------------
Private Sub UserForm_Deactivate()
ActiveWorkbook.Protect Password:="toto"
End Sub
'---------
Salutations
JJ
"Yvan" <Yvan@discussions.microsoft.com> a écrit dans le message de
news:0AF87D23-F836-4651-AE73-1B96907A5342@microsoft.com...
Bonjour,
A l'ouverture du classeur, la feuille Excel est protégée.
Au cours de la macro lancée via un Userform, la protection doit être ôtée,
puis remise en fin de traitement.
Bonsoir, Ceci peut-être '----------- Private Sub UserForm_Activate() ActiveSheet.Unprotect Password:="toto" End Sub '------------- Private Sub UserForm_Deactivate() ActiveWorkbook.Protect Password:="toto" End Sub '--------- Salutations JJ "Yvan" a écrit dans le message de news:
Bonjour,
A l'ouverture du classeur, la feuille Excel est protégée.
Au cours de la macro lancée via un Userform, la protection doit être ôtée, puis remise en fin de traitement.
Comment faire ? -- Merci pour vos réponses.
Jacky
Ouppssss
ActiveWorkbook.Protect Password:="toto" ActiveSheet. bien sûr...
JJ
"Jacky" a écrit dans le message de news:
Bonsoir, Ceci peut-être '----------- Private Sub UserForm_Activate() ActiveSheet.Unprotect Password:="toto" End Sub '------------- Private Sub UserForm_Deactivate() ActiveWorkbook.Protect Password:="toto" End Sub '--------- Salutations JJ "Yvan" a écrit dans le message de news:
Bonjour,
A l'ouverture du classeur, la feuille Excel est protégée.
Au cours de la macro lancée via un Userform, la protection doit être ôtée,
puis remise en fin de traitement.
Comment faire ? -- Merci pour vos réponses.
Ouppssss
ActiveWorkbook.Protect Password:="toto"
ActiveSheet. bien sûr...
JJ
"Jacky" <nospam@bidon.fr> a écrit dans le message de
news:OrXKxysbGHA.1272@TK2MSFTNGP03.phx.gbl...
Bonsoir,
Ceci peut-être
'-----------
Private Sub UserForm_Activate()
ActiveSheet.Unprotect Password:="toto"
End Sub
'-------------
Private Sub UserForm_Deactivate()
ActiveWorkbook.Protect Password:="toto"
End Sub
'---------
Salutations
JJ
"Yvan" <Yvan@discussions.microsoft.com> a écrit dans le message de
news:0AF87D23-F836-4651-AE73-1B96907A5342@microsoft.com...
Bonjour,
A l'ouverture du classeur, la feuille Excel est protégée.
Au cours de la macro lancée via un Userform, la protection doit être
ôtée,
ActiveWorkbook.Protect Password:="toto" ActiveSheet. bien sûr...
JJ
"Jacky" a écrit dans le message de news:
Bonsoir, Ceci peut-être '----------- Private Sub UserForm_Activate() ActiveSheet.Unprotect Password:="toto" End Sub '------------- Private Sub UserForm_Deactivate() ActiveWorkbook.Protect Password:="toto" End Sub '--------- Salutations JJ "Yvan" a écrit dans le message de news:
Bonjour,
A l'ouverture du classeur, la feuille Excel est protégée.
Au cours de la macro lancée via un Userform, la protection doit être ôtée,