概要：UIを洗練させる「トグル」という考え方
Excel業務において、シート上に配置した大量のデータや複雑な入力フォームを常に表示しておく必要はありますか？多くの場合、特定の操作時のみに必要な領域と、常に表示しておくべき領域は分かれています。しかし、シート上に常に全てを表示しておくと、視覚的なノイズとなり、ユーザーの操作ミスを誘発する原因となります。
そこで本連載の第1回目となる今回は、ボタン一つで特定の行や列、あるいは図形オブジェクトの表示・非表示を切り替える「トグル（Toggle）操作」の実装方法を解説します。トグルとは、一つのスイッチで二つの状態（ON/OFF）を交互に切り替える仕組みのことです。この技術を習得することで、Excelの画面構成を状況に応じて最適化し、まるで専用の業務アプリケーションのような洗練されたUIを実現することが可能になります。
詳細解説：Hiddenプロパティを操るロジックの核
Excel VBAにおいて、行や列の表示・非表示を制御するには「Rangeオブジェクト」の「EntireRow（行全体）」または「EntireColumn（列全体）」プロパティに対して、「Hidden（非表示）」プロパティを操作します。
Hiddenプロパティは「True」を代入すれば非表示、「False」を代入すれば表示されます。トグルを実現するための論理構成は非常にシンプルです。「現在の状態を反転させる」という考え方を採用します。具体的には「Hidden = Not Hidden」という構文を用います。この「Not」演算子は論理値を反転させる役割を持ちます。
例えば、ある行が現在表示されている（Hidden = False）場合、Not FalseはTrueとなり、HiddenにTrueが代入されます。逆に、非表示の状態（Hidden = True）であれば、Not TrueはFalseとなり、結果として表示されます。この一行のコードだけで、条件分岐（If文）を多用することなく、スマートに状態を切り替えることができるのです。
サンプルコード：行の表示・非表示を切り替える基本ルーチン
以下に、指定した範囲の行をボタン一つでトグルする標準的なプロシージャを提示します。このコードを標準モジュールに記述し、シート上のボタンに割り当ててください。
' 指定した行範囲の表示状態をトグルするプロシージャ
Sub ToggleRowsVisibility()
Dim targetRange As Range
' 操作対象となる行範囲を設定（例：10行目から20行目）
Set targetRange = Rows("10:20")
' 現在の表示状態を反転させる
' Hiddenプロパティに現在の状態の否定を代入する
targetRange.EntireRow.Hidden = Not targetRange.EntireRow.Hidden
' 処理終了をユーザーに通知（オプション：不要な場合は削除可能）
If targetRange.EntireRow.Hidden Then
MsgBox "対象範囲を非表示にしました。", vbInformation
Else
MsgBox "対象範囲を表示しました。", vbInformation
End If
End Sub
このコードの肝は、対象範囲を柔軟に変更できる点にあります。例えば、特定の名前を付けた「名前付き範囲」を対象にすることも可能です。その場合は、`Rows(“10:20”)` の部分を `Range(“DataArea”).EntireRow` のように書き換えるだけで、柔軟性が劇的に向上します。
実務アドバイス：ユーザーインターフェースとしての配慮
実務の現場でこの機能を導入する際、単に動作するコードを書くだけでは不十分です。「誰が使うのか」「どのような状況で使うのか」を深く考慮する必要があります。
一つ目のポイントは「ボタンのキャプション（表示名）の更新」です。ユーザーは、現在のボタンが「表示」を意味するのか「非表示」を意味するのかを直感的に判断したいと考えます。前述のコードに一工夫加え、ボタンのキャプションを動的に書き換える機能を実装しましょう。これにより、ユーザーはボタンを押す前に「今、これを押せば何が起きるか」を理解できるようになります。
二つ目のポイントは「画面更新の停止」です。大規模な範囲の表示・非表示を切り替える際、Excelが描画処理を繰り返すと画面がちらつき、動作が重く感じられることがあります。これを防ぐために、プロシージャの冒頭で `Application.ScreenUpdating = False` を実行し、最後に `True` に戻す処理を追加してください。これだけで、ツールとしての質が一段階向上します。
三つ目のポイントは「保護機能との兼ね合い」です。シートが保護されている場合、Hiddenプロパティの操作はエラーとなります。そのため、コード内で `ActiveSheet.Unprotect` と `ActiveSheet.Protect` を適切に配置し、実行時のみ保護を解除するフローを組み込む必要があります。
応用編への展望：なぜ「1/4」なのか
今回の記事では、最も基礎的かつ汎用性の高い「行の非表示切り替え」について解説しました。しかし、VBAによるUI制御はこれだけにとどまりません。次回以降の連載では、以下のステップでさらなる高度な制御を解説していく予定です。
第2回：図形（オートシェイプ）や画像オブジェクトをボタンで出現・消滅させる方法
第3回：複数のグループを連動させる連動型トグルスイッチの構築
第4回：ユーザーフォームやアドインを組み合わせた、よりプロフェッショナルなUI設計
これらの技術を組み合わせることで、単なるデータ管理ツールであったExcelは、ユーザーにとって使いやすく、ミスが起きにくい「業務アプリ」へと進化を遂げます。
まとめ：Excel VBAで「体験」をデザインする
今回学んだトグル操作は、VBAプログラミングにおける「状態管理」の基本中の基本です。多くの初心者は「表示させるためのボタン」と「非表示にするためのボタン」を個別に作成しがちですが、これはUIを煩雑にするだけでなく、コードの保守性も低下させます。
「一つのボタンで二つの役割を果たす」という考え方は、限られた画面領域を有効活用し、ユーザーの認知負荷を最小限に抑えるための重要なエンジニアリング思考です。まずは今回紹介したコードをコピー＆ペーストし、自身の業務シートで試してみてください。
ボタンをクリックした瞬間に、パッと行が展開される——その心地よい操作感こそが、VBAによる業務改善の醍醐味です。この「体験」をデザインすることこそが、ベテランエンジニアへの第一歩となります。次回は、より視覚的なインパクトの強い「オブジェクトの表示切り替え」に焦点を当てます。引き続き、Excel VBAの深淵を楽しんでいきましょう。
