Excelブックの左下に表示されているシート見出しを非表示/表示にする方法について説明します。
【目次】
構文
記述方法は、以下の通りとなります。
=======================================================================
Windows(”［ブック名］”).DisplayWorkbookTabs = False
Windows(”［ブック名］”).DisplayWorkbookTabs = True
=======================================================================
[説明]：
シート見出しを非表示にするには「Windows(”［ブック名］”).DisplayWorkbookTabs = False」と記述し、表示するには「Windows(”［ブック名］”).DisplayWorkbookTabs = True」と記述します。［ブック名］にはシート見出しを非表示又は表示したいブック名を記述します。また、ブック名は「”」（ダブルクォーテーション）で囲みます。Falseはシート見出しを非表示にするとの意味となり、Trueはシート見出しを表示するとの意味になります。内容を纏めると、「［ブック名］で記述したブックのシート見出しを非表示又は表示して下さい。」との意味になります。
[記述例]：
Windows("Book1.xlsm").DisplayWorkbookTabs = False
Windows("Book1.xlsm").DisplayWorkbookTabs = True
使い方
使い方について、具体的に説明していきます。
シート見出しを非表示にする方法
シート見出しを非表示にする方法について説明します。
[記述例]：
※以下の記述例は、VBE（VBA記述画面）に記述しないと実行ができません。VBEの開き方については、VBEの開き方を参考にして下さい。
-------------------------------------------------
Sub サンプル()
Windows("Book1.xlsm").DisplayWorkbookTabs = False
MsgBox "シート見出しを非表示にしました。"
End Sub
-------------------------------------------------
内容は、「Book1.xlsmブックのシート見出しを非表示にし、最後にMsgBoxで”シート見出しを非表示にしました。”のメッセージを表示して下さい。」との意味になります。
[実行例]：
（実行前）
（実行後）
シート見出しを非表示にする方法についての説明は以上です。
シート見出しを表示にする方法
シート見出しを表示にする方法について説明します。
[記述例]：
※以下の記述例は、VBE（VBA記述画面）に記述しないと実行ができません。VBEの開き方については、VBEの開き方を参考にして下さい。
-------------------------------------------------
Sub サンプル()
Windows("Book1.xlsm").DisplayWorkbookTabs = True
MsgBox "シート見出しを表示しました。"
End Sub
-------------------------------------------------
内容は、「Book1.xlsmブックのシート見出しを表示にし、最後にMsgBoxで”シート見出しを表示しました。”のメッセージを表示して下さい。」との意味になります。
[実行例]：
（実行前）
（実行後）
シート見出しを表示にする方法についての説明は以上です。
おわりに
今回はシート見出しを非表示/表示する方法について説明しました。Excelで業務ツールを作成しようとした場合等、シートを表示させたくないケースがあります。その様な場合に活用してみて下さい。