エクセルVBAを使ってワークシート画面にある数式バーを非表示にする方法

2020年7月14日2024年9月16日

ノートパソコンでエクセルの作業を行っていると、画面が小さいので表示範囲が狭く、広くすると文字が小さくなるので不要な数式バーがある1行をなくしたいと思ったことありませんか？

エクセルVBAの「DisplayFormulaBarプロパティ」を使うだけで、簡単に数式バーを非表示にできますよ。

数式バーを非表示

数式バーは上記画面で「②」の部分で、関数などをセルに入力するとこの部分に数式が表示されます。

今回はこの数式バー自体を非表示にして、ワークシートのスペースを広げることができます。

DisplayFormulaBarプロパティとApplicationを組み合わせると、現在表示しているエクセルシートの数式バーを表示したり非表示にしたりすることができるようになります。

では実際にここでは、ユーザーフォームに配置したコマンドボタンに数式バーを表示・非表示にするVBAコードを書いていきましょう。

数式バーを非表示にするには、DisplayFormulaBarをFalseに指定することでできるようになります。

数式バーを非表示にするVBA

Private Sub CommandButton1_Click()
With Application
.DisplayFormulaBar = False
End With
End Sub

解説

これで、コマンドボタン1が押されたら数式バーが非表示になります。

数式バーを非表示にできたら、再表示できないと不都合なので、.DisplayFormulaBarをTrueに指定することでできるようになります。

数式バーを表示するVBA

Private Sub CommandButton1_Click()
With Application
.DisplayFormulaBar = True
End With
End Sub

解説

非表示のFalseを表示のTrueに変更するだけで完成するのとても簡単です。

この方法でも問題ないのですが、ちょっと工夫すると1つのコマンドボタンで非表示も再表示もできるんですよ！

なんでもかんでもできるわけではないのですが、この種の表示・非表示の切り替えには、FalseやTrueの代わりにNot演算子を使用するとできるようになります。

数式バーの表示・非表示の切り替えVBA

Private Sub CommandButton1_Click()
With Application
.DisplayFormulaBar = Not .DisplayFormulaBar
End With
End Sub

解説

意外と簡単ですよね。

作成したエクセルは様々なスタッフが使う為に、想定外の操作をされてしまいエラーを引き起こすことがあるので、ユーザーフォーム以外の操作をできないように工夫してはいかがですか？

ちなみに、ボタン1つで表示を切り替えたり元に戻したりできると便利なので、ほかの表示方法も知っていて損はないと思いますよ！