I have a spreadsheet with about 20 tabs. I need a macro to unlock/lock all of them. Problem is, sometimes some of them are already locked/unloced so my macro bombs.
Sub Macro1()
'
ActiveSheet.Next.Select
ActiveSheet.Unprotect
ActiveSheet.Next.Select
ActiveSheet.Unprotect
End Sub
Can anyone help with a macro that will unlock or lock all sheets? If it could enter the password as well that would be great.
Sub Macro1()
'
ActiveSheet.Next.Select
ActiveSheet.Unprotect
ActiveSheet.Next.Select
ActiveSheet.Unprotect
End Sub
Can anyone help with a macro that will unlock or lock all sheets? If it could enter the password as well that would be great.