プログラミング

【VBA】シートの保護の設定・解除

VBAでシートの保護と解除をする方法を紹介します。

シートを保護する

Dim wbk As Workbook
Dim ws As WorkSheet

Set wbk = ThisWorkbook
Set ws = wbk.Worksheets("保護するシート名")

ws.Protect Password:="mypassword"

シートの保護を解除する

Dim wbk As Workbook
Dim ws As WorkSheet

Set wbk = ThisWorkbook
Set ws = wbk.Worksheets("保護を解除するシート名")

ws.Unprotect Password:="mypassword"

-プログラミング
-