全シート保護解除.vba
Sub 全シートの保護を解除する()
Dim sh As Object
On Error Resume Next
For Each sh In Sheets
sh.Unprotect
Next sh
End Sub
More than 5 years have passed since last update.
Sub 全シートの保護を解除する()
Dim sh As Object
On Error Resume Next
For Each sh In Sheets
sh.Unprotect
Next sh
End Sub
Register as a new user and use Qiita more conveniently