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

  1.
    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
    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
    2. noila59216 Posted messages 34 Status Member
       
      thank youuuuuuuuu
      I'll do that tomorrow.....
      0
    3. noila59216 Posted messages 34 Status Member
       
      yes it works ... I hope I'll be able to do it again in the future
      0