概要：なぜVBAで「非表示」を制御するのか
Excelでの帳票作成において、印刷時に不要なデータを隠すという作業は避けて通れません。例えば、計算過程の中間データ、機密保持のための個人情報列、あるいは特定の条件を満たさない行を自動で除外して印刷したいといったケースです。手動で右クリックから「非表示」を選択し、印刷後に再表示させるというプロセスは、ヒューマンエラーの温床であり、何より時間がかかります。
本稿では、VBAを用いてこれらの操作を自動化し、印刷設定と組み合わせることで、極めて洗練された帳票出力システムを構築する方法を解説します。単に非表示にするだけでなく、印刷完了後に「元の状態に戻す」という一連のフローを安全に行うためのプロフェッショナルな設計思想を学びましょう。
詳細解説：RangeオブジェクトのHiddenプロパティの挙動
VBAで特定の行や列を非表示にするには、`Range`オブジェクトの`EntireRow`プロパティまたは`EntireColumn`プロパティに対して、`Hidden`プロパティを`True`に設定します。
基本的な構文は以下の通りです。
・Rows(1).EntireRow.Hidden = True （1行目を非表示）
・Columns(“C”).EntireColumn.Hidden = True （C列を非表示）
ここで重要なのは、この操作が「ワークシートの表示状態」に直接干渉する点です。もしマクロが途中でエラーを起こして停止した場合、データが隠れたままの状態になり、ユーザーを混乱させるリスクがあります。したがって、実務コードでは必ず「エラーハンドリング」を実装し、どのような状況でも表示状態が元に戻るように設計しなければなりません。
また、印刷を行う際は、`Worksheet.PrintOut`メソッドを使用します。この際、`PrintOut`の引数を適切に指定することで、プレビューを表示するか、部数を何部にするかといった詳細な設定が可能になります。
サンプルコード：安全かつ効率的な印刷制御の実装
以下は、特定の列（計算補助列）を一時的に非表示にしてから印刷を行い、即座に元に戻すという実務で多用されるパターンです。
Sub PrintReportWithHiddenColumns()
Dim ws As Worksheet
Set ws = ThisWorkbook.Sheets("Sheet1")
' エラーが発生しても必ず元の状態に戻るように設定
On Error GoTo Cleanup
' 1. 印刷用準備：特定の列を非表示にする
' 今回はC列からD列を非表示にする例
ws.Columns("C:D").EntireColumn.Hidden = True
' 2. 印刷処理
' Preview:=Trueにすると印刷プレビューが表示されます
ws.PrintOut Copies:=1, Preview:=True, Collate:=True
Cleanup:
' 3. 後処理：非表示にした列を必ず再表示させる
ws.Columns("C:D").EntireColumn.Hidden = False
' エラーがあれば通知
If Err.Number <> 0 Then
MsgBox "印刷中にエラーが発生しました：" & Err.Description, vbCritical
End If
End Sub
このコードのポイントは、`On Error GoTo Cleanup`を用いた「終了処理の保証」です。印刷ダイアログでユーザーがキャンセルを押した場合や、プリンタのトラブルが発生した場合でも、確実に`Cleanup`ラベルへ遷移し、非表示列を戻す仕組みになっています。
実務アドバイス：可変データへの対応と応用テクニック
実務では、非表示にする範囲が固定であることは稀です。例えば「売上が0の行をすべて隠したい」といった動的な要件が頻出します。このような場合は、`AutoFilter`メソッドを活用するのが最も高速です。
`ws.Range(“A1:A100″).AutoFilter Field:=1, Criteria1:=”<>0″`
このように、特定条件でフィルタをかけてから`PrintOut`を行うことで、VBAで一つ一つ行を判定して`Hidden = True`とするよりも、処理速度が圧倒的に向上します。
また、さらに高度なテクニックとして「ページ設定（PageSetup）」の操作と組み合わせることも有効です。特定の列を非表示にするだけでなく、印刷時にのみ「列幅を自動調整する」あるいは「印刷範囲を動的に書き換える」設定を加えることで、レイアウトの崩れを防ぐことができます。
もし、印刷後に特定のセルを選択状態にしておきたい場合は、`Application.ScreenUpdating`を一時的に`False`に設定してください。これにより、非表示・再表示のチラつきを抑え、ユーザーに対してプロフェッショナルな操作感を提供できます。
まとめ：保守性の高いコードを書くための心得
VBAで印刷制御を行う際、最も優先すべきは「データの完全性」です。非表示操作はシートの見た目を変える破壊的な操作であるため、必ず「元に戻す（再表示）」という処理をセットで考える必要があります。
1. **エラーハンドリングの徹底**: 印刷は外部要因（プリンタエラー等）に左右されやすいため、必ず`On Error GoTo`を使用する。
2. **高速化の意識**: 行単位のループ処理は避け、`AutoFilter`や`Range`の一括操作を用いる。
3. **ユーザー体験の向上**: `ScreenUpdating`をオフにし、操作中のチラつきを抑える。
これらの技術を習得することで、あなたのExcel帳票システムは単なる「データ集計ツール」から、業務フローの一部を完全に自動化する「システム」へと進化します。今回紹介したコードをベースに、ご自身の業務フローに合わせてカスタマイズしてみてください。VBA講師として、皆さんの現場がより快適に、そして効率的になることを確信しています。
