VBAでエクセル画面のグリッド線を非表示にする

ウィンドウの操作 画面の操作
ウィンドウの操作

エクセル画面にはセルの枠を示す縦横の線(グリッド線という)が必ず表示されていますが、ユーザーフォームなどを使ってエクセル自動化させた時に見栄えも気になりませんか?

ユーザーフォームの背景に縦横のグリッド線があると見た目が煩わしく思いますよね。

そこで見栄え良く消してしまえば見た目良くなったと感じますので、簡単なのでやってみましょう。

とりっぷぼうる
とりっぷぼうる

方法は簡単で、セルの枠線(グリッド線)を非表示にする(DisplayGridlinesプロパティ)を使うだけで、簡単なのでぜひ取り入れてみませんか?

スポンサーリンク

DisplayGridlinesプロパティ

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

  • セルの枠線を非表示・・・False
  • セルの枠線を表示・・・・True

では実際にここでは、ユーザーフォームに配置したコマンドボタンにセルの枠線(グリッド線)を表示・非表示にするVBAコードを書いていきましょう。

セルの枠線(グリッド線)を非表示

セルの枠線(グリッド線)を非表示にするには、DisplayGridlinesをFalseに指定することでできるようになります。

セルの枠線(グリッド線)を非表示にする

Private Sub CommandButton1_Click()
With ActiveWindow
.DisplayGridlines = False
End With
End Sub

解説
  1. コマンドボタン1が押されたら
  2. 現在表示中のワークシートを操作する
  3. グリッド線の表示を非表示にする
  4. withステートメント終了
  5. マクロ終了

これで、コマンドボタン1が押されたらセルの枠線(グリッド線)が非表示になります。

セルの枠線(グリッド線)を再表示

セルの枠線(グリッド線)を非表示にできたら、再表示できないと不都合なので、DisplayGridlinesをTrueに指定することでできるようになります。

セルの枠線(グリッド線)を表示する

Private Sub CommandButton1_Click()
With ActiveWindow
.DisplayGridlines = True
End With
End Sub

解説
  1. コマンドボタン1が押されたら
  2. 現在表示中のワークシートを操作する
  3. グリッド線を表示する
  4. withステートメント終了
  5. マクロ終了

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

この方法でも問題ないのですが、コマンドボタンを2つ用意しなくてはいけないのですが、ちょっと工夫すると1つのコマンドボタンで非表示も再表示もできるんですよ!

クリックするたびにグリッド線の表示/非表示を切り替え

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

グリッド線の表示/非表示を切り替え

Private Sub CommandButton1_Click()
With ActiveWindow
.DisplayGridlines = Not .DisplayGridlines
End With
End Sub

解説
  1. コマンドボタン1が押されたら
  2. 現在表示中のワークシートを操作する
  3. グリッド線の表示・非表示を切り替える
  4. withステートメント終了
  5. マクロ終了

意外と簡単ですよね。

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

画面操作関連
表示されている各種項目を非表示に設定可能です

画面表示の便利機能

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