セルのグリッド(線)の表示を切り替える

セルの書式設定で罫線を使って表を作ることがよくあります。
その際に、罫線がグリッド線のせいで分かりにくくなることがあります。
特に、細い線を使った場合は罫線なのかグリッド線なのか判別がしづらくなります。

仕事などで作成する表はもっと大きいものの方が多いと思われますので、
印刷後に失敗したことに気が付いて、再修正、なんてことを考えられます。
グリッド線の表示と非表示が瞬時に行うことができれば、
ミスの削減につながり全体的な作業時間の短縮にも繋がります。

グリッド線は設定(Excel2007以降はファイルメニュー→オプション→詳細設定→枠線を表示する のチェック)で切り替えられますが、
設定を変更するまでの操作がわずらわしいのが難点です。
setting.png
そのわずらわしさを解消するためのグリッド線の表示と非表示を切り替えるマクロです。

このような感じになります。
グリッド線表示
on.png

グリッド線非表示
off.png


この例では3行目と4行目の間に線がない部分がありますが、
グリッド線があるとそれが分かりにくいです。

コードは以下になります。
このマクロを実行する度にグリッド線の表示と非表示が切り替わります。
Excel2003含め、以降のバージョンでも動作確認済みです。

Sub GridOnOff()
'// グリッド線が非表示の場合
If (ActiveWindow.DisplayGridlines = False) Then
'// グリッド線を表示する
ActiveWindow.DisplayGridlines = True
'// グリッド線が表示されている場合
Else
'// グリッド線を非表示にする
ActiveWindow.DisplayGridlines = False
End If
End Sub


是非活用してください。

この記事へのコメント

この記事へのトラックバックURL
http://blog.seesaa.jp/tb/445835655

この記事へのトラックバック