入力欄以外のシートを保護する : Excel(エクセル)

Excel Tipsメニューに戻る

スポンサーリンク






Excel VBAでシートを保護するには、Protectメソッドを使用します。
保護を解除するには、Unprotectメソッドを使用します。

Protectメソッドを実行すると、入力欄も編集できなくなるのでセルを指定し、Locked = False を実行します。

Excelシート画面

■実行Excelシート
シートを保護したシート

■保護したセルに入力しようとすると、下図のエラーが発生します。
エラーダイアログ

スポンサーリンク


Excel VBA実行コード

Option Explicit

Private Sub CommandButton1_Click()
    
On Error Resume Next
    '単価欄は編集可能にする
    Range("F3:F8").Locked = False
    
    'Sheet1を保護する
    Worksheets("Sheet1").Protect

End Sub

Private Sub CommandButton2_Click()

    'Sheet1の保護を解除する
    Worksheets("Sheet1").Unprotect

End Sub

スポンサーリンク







Excel Tipsメニューに戻る

■■■
このサイトの内容を利用して発生した、いかなる問題にも一切責任は負いませんのでご了承下さい
■■■
当ホームページに掲載されているあらゆる内容の無許可転載・転用を禁止します


Copyright (c) Excel-Excel ! All rights reserved