- 公開日：2016-9-9
- プロナビTOP / プログラミング初心者向け技術系ノウハウ・まとめ
VBAでシートの保護を行う方法についてご説明します。誤ってシートに書き込みが行われないよう保護をかけることはとても大切です。それでは具体的な方法について確認していきましょう。
シートの保護
シートの保護はProtectメソッドにより行います。
＜コード＞
|
1 |
ActiveSheet.Protect 'アクティブシートを保護' |
＜実行例＞
シートの編集を行おうとするとメッセージが表示され、シートが保護されているのが分かります。
シートの保護解除
シートの保護を解除する場合はUnprotectメソッドを使用します。
＜コード＞
|
1 |
ActiveSheet.Unprotect 'アクティブシートの保護を解除' |
＜実行例＞
シートの編集が可能になりました。
シートにパスワードをかける方法
シートにパスワードを設定する場合はProtectの引数Passwordを設定します。
※ちなみにパスワードは大文字と小文字が区別されます。
＜コード＞
|
1 |
ActiveSheet.Protect Password:="SamplePass" 'パスワード≪SamplePass≫を設定' |
シートのタブを右クリックして「シートの保護を解除」を選択すると、設定したパスワードを入力する画面が表示されます。
＜実行例＞
なお、パスワード付きシートの保護をVBAで解除する場合はUnprotectの引数Passwordを設定します。
＜コード＞
|
1 |
ActiveSheet.Unprotect Password:="SamplePass" 'パスワード≪SamplePass≫で保護解除' |
特定のセルの保護を解除
シートに保護をかけたいけれど入力できるセルを残しておきたいというパターンがあります。そんな時は保護をかけたくないセルのロックを解除してからシートに保護をかけるようにしてください。
＜コード＞
|
1 2 |
ActiveSheet.Range("C3:C8").Locked = False 'C列の3行目～8行目をロック解除（入力可能に設定）' ActiveSheet.Protect |
＜実行例＞
まとめ
シートの保護を行うことは作成したExcelファイルの内容が誤って、上書きされないために非常に重要です。パスワードやロックの解除等と組み合わせてシートの管理にぜひ役立ててください。
プログラミングで挫折しそうなら、現役エンジニアにマンツーマンで相談してみませんか？オンラインのプログラミングスクール「TechAcademy」のメンターが対応。
この記事が気に入ったら
いいね！しよう
プロナビの最新情報をお届けします
あわせて読みたい
2016年8月19日 【VBA入門】シートを取得する方法（Worksheetオブジェクト）- 2016年7月31日 【VBA入門】シートを追加する方法（Addメソッド）
- 2016年7月22日 【VBA入門】シートを削除する方法（Deleteメソッド）
- 2016年7月28日 【VBA入門】シートをアクティブにする方法（Activateメソッド）
- 2016年7月19日 【VBA入門】シートをコピーする方法
- 2016年9月3日 【VBA入門】シート名を変更する方法
