View original (French)

Remove protection from multiple sheets (here 150)

Solved
noila59216 Posted messages 34 Status Member -  
noila59216 Posted messages 34 Status Member -
Hello,
is it possible to remove the protection from 150 sheets at once???? I already have some removed but not all.... thank you for your help

Configuration: Windows / Chrome 53.0.2785.116

2 answers

Answer 1 / 2
titeufdu89 Posted messages 387 Status Member 38
 
Hello Noila,

Paste the following code into a module of your file and run the macro from "Macro" in the "Developer" tab, it will remove the protection from each sheet of your workbook. 

Sub deproteger() Dim ws As Worksheet For i = 1 To Worksheets.Count Set ws = Worksheets(i) ws.Unprotect Next i End Sub


Have a great day

Jc
1
titeufdu89 Posted messages 387 Status Member 38
 
Just a little clarification, as soon as a workbook contains macros (automation), it is advisable to save the workbook in the XLSM (macro-enabled format) so save your workbook in the correct format to be able to use this macro.

Jc
0
noila59216 Posted messages 34 Status Member
 
thank youuuuuuuuu
I'll do that tomorrow.....
0
noila59216 Posted messages 34 Status Member
 
yes it works ... I hope I'll be able to do it again in the future
0