Excel で複数のワークシートを一度に保護するには?
複数のワークシートを含むブックがあり、すべてのワークシートまたは特定のワークシートを保護する必要があるとします。通常、Excel では「ワークシートの保護」機能を使って1 つずつしか保護できませんが、保護すべきシートが多数ある場合、この方法は面倒で時間がかかります。Excel で複数のシートを素早く簡単に一度に保護するにはどうすればよいでしょうか?
Kutools for Excel で複数のシートを一度に保護する
Kutools for Excel で複数のシートを一度に保護解除する
VBA コードで全シートを一度に保護する
次の VBA コードを使えば、現在のワークブックに含まれるすべてのシートを、同じパスワードで一括して保護できます。手順は以下のとおりです。
1.ALT + F11キーを押すと、Microsoft Visual Basic for Applicationsウィンドウが開きます。
2.挿入>標準モジュールをクリックし、表示された標準モジュールウィンドウに次のコードを貼り付けてください。
VBA コード:ブック内のすべてのワークシートを一度に保護する:
Sub protect_all_sheets()
top:
pass = InputBox("password?")
repass = InputBox("Verify Password")
If Not (pass = repass) Then
MsgBox "you made a boo boo"
Goto top
End If
For i = 1 To Worksheets.Count
If Worksheets(i).ProtectContents = True Then Goto oops
Next
For Each s In ActiveWorkbook.Worksheets
s.Protect Password:=pass
Next
Exit Sub
oops: MsgBox "I think you have some sheets that are already protected. Please unprotect all sheets then running this Macro."
End Sub 3.次に、F5キーを押してコードを実行し、プロンプトボックスに保護対象シートのパスワードを入力してください(下記スクリーンショット参照)。

4.OKをクリックして、再度パスワードを入力し、確認してください。

5.次にOKをクリックすると、すべてのシートが同じパスワードで保護されます。
Kutools for Excel で複数のシートを一度に保護する
場合によっては、ブック内のすべてのシートではなく、特定のシートだけを保護したいこともあるでしょう。そんなときは、上記のコードは使えません。しかし、Kutools for Excelのワークシートの保護ユーティリティを使えば、すべてのシートでも、特定のシートでも、素早く簡単に保護できます!
Kutools for Excelをインストール後、次の手順に従って操作してください。
1.KUTOOLS PLUS>ワークシートの保護をクリックします(下記スクリーンショット参照)。

2.ワークシートの保護ダイアログボックスで、保護したいシートを選択してください。(デフォルトでは、現在のブック内のすべてのワークシートがチェックされています。)下記のスクリーンショットをご確認ください。

3.次に、OKをクリックして「ワークシートの保護」ダイアログボックスでパスワードを入力し、確認してください。下記のスクリーンショットをご覧ください。

4.次にOKをクリックすると、選択したワークシートが保護されます。
「ワークシートの保護」機能の詳細についてはこちらをクリックしてください。
Kutools for Excel で複数のシートを一度に保護解除する
ブック内の複数のワークシートの保護を一度に解除するにはどうすればよいでしょうか?もちろん、Kutools for Excelには、それらを一括で保護解除できるワークシートの保護解除ユーティリティも用意されています。
次の手順に従って操作してください。
1.保護を解除したいワークシートが含まれるブックを開きます。
2.次に、KUTOOLS PLUS > ワークシートの保護解除をクリックします(下記スクリーンショット参照)。

3.ワークシートの保護解除ダイアログボックスに保護済みのシートがリストボックスに表示されますので、OKボタンをクリックしてください(下記スクリーンショット参照)。

4.その後、ワークシートの保護解除ダイアログボックスが表示され、ワークシートを保護する際に設定したパスワードの入力を求められます(下記スクリーンショット参照)。

5.パスワードを入力してOKをクリックすると、リストボックスでチェックされたすべてのワークシートの保護が解除されます。
注:すべてのワークシートは同じパスワードを使用する必要があります。
「ワークシートの保護解除」機能の詳細についてはこちらをご覧ください。
Kutools for Excel— 300 以上の必須ツールでExcel を強化し、作業をより迅速・簡単に。AI 機能を活用して、スマートなデータ処理と生産性の飛躍的な向上を実現します。今すぐ入手
デモ:Kutools for Excel で全ワークシートを一度に保護または保護解除する
関連記事:
Excel で複数のワークシートを一度に保護を解除するには?
最高の Office 業務効率化ツール
| 🤖 | KUTOOLS AI アシスタント:次に基づいてデータ分析を革新します:インテリジェント実行 | コード生成| カスタム数式作成 | データ分析とチャート生成| 拡張機能呼び出し… |
| 人気の機能:検索・ハイライト、または重複をマーキング | 空白行を削除する | データを失うことなく列の結合またはセルを | 数式を使用しない四捨五入... | |
| スーパー LOOKUP:複数条件 VLookup | 複数値 VLookup | 複数シート間 VLookup | ファジーマッチ.... | |
| 高度なドロップダウンリスト:ドロップダウンリストをすばやく作成 | 連動型ドロップダウンリスト | 複数選択可能なドロップダウンリスト.... | |
| 列マネージャー:指定した数の列を追加|列の移動|非表示列の表示状態を切り替え|範囲および列の比較... | |
| 注目の機能:グリッドフォーカス | デザインビュー |強化された数式バー | ワークブックとシートマネージャー | リソースライブラリ(オートテキスト)| 日付ピッカー | ワークシートの統合 | 暗号化/セルの復号化 | リストからメール送信 | スーパーフィルター | 特殊フィルタ(太字のフォントを持つセルをフィルタリング/斜体/取り消し線。。。) 。。。 | |
| トップ15 ツールセット:12 テキストツール(テキストの追加、特定の文字を削除、...)| 50+チャートタイプ(ガントチャート、...)| 40+実用的関数(誕生日に基づいて年齢を計算します、...)| 19 挿入ツール(QR コードを挿入、パスから画像を挿入、...)| 12 変換ツール(単語に変換する、為替レートの変換、...)| 7 結合と分割ツール(高度な行のマージ、セルの分割、...)|さらに多数 |
Kutools for Excel でExcel スキルを強化し、これまでにない効率を体験しましょう。Kutools for Excel は、生産性を高め、時間を大幅に節約できる高度な機能を300 以上提供します。最も必要な機能を今すぐ入手するにはこちらをクリック。。。
Office Tab は Office にタブインターフェースをもたらし、作業を大幅に簡単にします
- Word、Excel、PowerPoint でタブを使った編集と閲覧を有効にします。Publisher、Access、Visio、Project でもご利用いただけます。
- 複数のドキュメントを、新しいウィンドウではなく、同じウィンドウ内の新しいタブで開いたり作成したりできます。
- 日々の生産性を50%も向上させ、毎日数百回ものマウスクリックを削減します!
すべてのKutools アドインが、たった1 つのインストーラーで完結。
Kutools for Officeスイートには、Excel ・Word ・Outlook ・PowerPoint 用のアドインと Office Tab Pro が含まれており、複数の Office アプリを横断して作業するチームに最適です。
- オールインワンスイート— Excel、Word、Outlook、PowerPoint 用アドイン+Office Tab Pro
- インストーラー1 つ、ライセンス1 つ— 数分でセットアップ可能(MSI 対応)
- 連携してさらにパワーアップ— Office アプリ全体で生産性が向上
- 30 日間のフル機能トライアル— 登録不要、クレジットカード不要
- 最高のお得感— 個別アドイン購入よりお得