【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" 

コメント

タイトルとURLをコピーしました