1. 導入：なぜシートの非表示が重要なのか
実務において、計算用のマスターデータや、ユーザーに直接触られたくない管理シートをそのまま表示させておくのは、誤操作やデータ改ざんのリスクを招きます。手動で非表示にするのも一つの手ですが、VBAを活用すれば「特定の処理が終わったときだけ隠す」「権限に応じて表示を切り替える」といった動的な制御が可能になります。今回は、VBAを使ってシートをスマートに管理する方法を解説します。
2. 基礎知識：シートの表示状態を制御する「Visibleプロパティ」
Excelのシートには、VBAから制御可能な「Visible（表示）」プロパティが存在します。これには主に3つの状態があります。
xlSheetVisible：表示（通常の状態）
xlSheetHidden：非表示（ユーザーが右クリックで再表示可能）
xlSheetVeryHidden：非常に非表示（ユーザーが右クリックの再表示メニューからでは変更不可能）
実務では、誤操作を防ぐために「xlSheetVeryHidden」を多用します。これはVBAからでないと再表示できないため、データの完全性を高めるのに非常に有効です。
3. 実装/解決策
シートの非表示を制御するには、対象のシートオブジェクトに対してVisibleプロパティを設定するだけです。
注意点として、ブックには必ず一つ以上の表示されているシートが必要です。すべてのシートを非表示にしようとするとエラーが発生するため、プログラム内で「表示状態のシートが他に存在するか」を確認するロジックを挟むのが堅牢なコードの鉄則です。
4. サンプルプログラム
以下のコードは、指定したシートを「VeryHidden（再表示不可）」にするマクロです。
Sub HideSheetSecurely()
Dim targetSheet As Worksheet
‘ 操作対象のシートを指定
Set targetSheet = ThisWorkbook.Sheets(“管理用データ”)
‘ すでに非表示なら何もしない
If targetSheet.Visible = xlSheetVeryHidden Then Exit Sub
‘ セキュリティを高めるため、右クリックメニューから再表示できない設定にする
targetSheet.Visible = xlSheetVeryHidden
MsgBox “シート「” & targetSheet.Name & “」を保護しました。”, vbInformation
End Sub
Sub ShowHiddenSheet()
‘ 非表示にしたシートを再表示するマクロ
ThisWorkbook.Sheets(“管理用データ”).Visible = xlSheetVisible
End Sub
5. 応用・注意点
・エラー回避のポイント
すべてのシートを非表示にしようとすると「インデックスが有効範囲にありません」や「設定できない」といったエラーが出ます。ループ処理で一括非表示にする場合は、必ず「現在表示されているシートのカウント」を取得し、最後の1枚は非表示にしないような条件分岐（If文）を必ず組み込んでください。
・セキュリティの限界
「xlSheetVeryHidden」はユーザーの誤操作を防ぐには非常に強力ですが、VBAコード自体にパスワードをかける（VBAプロジェクトの保護）を行わないと、結局マクロで再表示されてしまいます。本当に機密性の高いデータであれば、シートの非表示だけでなく、VBAプロジェクトのパスワード設定も併せて実施することをおすすめします。
