エクセルの指定セルにロックをしたり、解除したりする方法

1.シート全体のロックを解除します。

PC9_3207

 

2.ロックするセルをロックします。

PC9_3206

 

3.下記の命令で部分的にロックを制御します。

B2:B9のロックを解除する

Private Sub cmd003_Click()
Worksheets(“Sheet1”).Unprotect “0000”
MsgBox “Sheet1の保護を解除しました。パスワード(0000)”, vbOKOnly + vbInformation, “確認”
End Sub

 

B2:B9をロックる

Private Sub cmd004_Click()
Worksheets(“Sheet2″).Protect Password:=”0000”
MsgBox “Sheet2を保護しました。パスワード(0000)”, vbOKOnly + vbInformation, “確認”
End Sub

 

コメントを残す

メールアドレスが公開されることはありません。 が付いている欄は必須項目です