けど、そんな中で悩むことは、

ですよね。

今回はそんなお悩みを解決する

についてまとめます！

完成イメージ

罫線が消えてしまうのは、罫線そのものが壊れているわけではありません。
多くの場合は書式・塗りつぶし・表示の設定が原因です。
今回は
・罫線が消える6つの原因と、それぞれの直し方（罫線の引き直し・塗りつぶしなし・VBA）
をゴールにします。
原因をひとつずつ切り分けられるようになれば、同じトラブルを繰り返さなくなります。

なお、印刷プレビューでだけ罫線が消えるときの対処や、VBAで罫線を一括設定する方法、うまくいかないときのトラブルシュートもあわせてご紹介します。
早速実装して試してみましょう！

上の画像が完成形です。消えていた罫線が選択範囲のすべてに引き直され、見出しの色と合計行の目印も付いています。

STEP1. 罫線付きの売上表を用意する

まずは罫線を引いた売上表を用意します。
1行目が見出し、2行目以降がデータです。
A列が商品、B列が数量、C列が単価、D列が金額です。
金額は手入力せず、=B2*C2 の数式にしておきましょう。
見出し行には罫線に加えて薄い色を付けてあります。
この「罫線がきれいに揃った状態」をスタート地点にします。

下の表をコピーして、Excelのシートに貼り付けるとそのまま試せます。

※ 数式で求める列は空にしています。すでに値が入っている列はそのまま残して試せます。

STEP2. 金額を数式で求める

金額は手入力ではなく、=B2*C2 と入力して求めます。
数式にしておくと、数量や単価を直したときに金額が自動で変わります。
入力するのは D2セル です。
数式バーと選択セルの位置を画像で確認しておきましょう。
あとはフィルハンドルでD9までコピーすれば、金額がすべて埋まります。

STEP3. 罫線が消える6つの原因

罫線が消えたように見える原因は、大きく6つに分けられます。
まずは「何が原因か」を切り分けましょう。
もっとも多いのが、セルの書式をまとめてクリアしたケースです。
「クリア」から「書式のクリア」を選ぶと、値は残ったまま罫線だけが消えます。

罫線が消える6つの原因

画像は、書式をクリアして罫線だけが消え、値はそのまま残っている状態です。

STEP4. 対処① 罫線を引き直す（枠なし→格子）

罫線だけが消えているときは、もう一度引き直すのがいちばん確実です。
罫線を引きたい範囲を選択します。
ここでは見出しを含む A1:D10 を選びました。
次に ホーム タブ → 罫線ボタン（格子のアイコン）→ 「枠なし」 をクリックします。
いったんすべての罫線を外してから、「格子」 をクリックします。
「格子」を選ぶと、選択した範囲の内側と外側すべてに細い罫線が引かれます。
先に「枠なし」を選ぶと、古い指定が残らずきれいに引き直せます。カンタンですね。
画像は、罫線を引き直したあとの状態です。
見出しの色も付け直しているので、元の見た目が戻っています。

STEP5. 対処②〜⑥ 原因別の直し方

次に、原因がはっきりしているときの直し方です。
それぞれの手順を確認していきましょう。

② 白い塗りつぶしを「なし」にする

セルを「白」で塗りつぶすと、グリッド線が隠れて罫線が消えたように見えます。
対象の範囲を選択し、ホーム タブ → 塗りつぶしの色 → 「塗りつぶしなし」 をクリックします。
白く塗るのではなく、「塗りつぶしなし」に戻すのがポイントです。

③ 罫線の色を「自動」に戻す

罫線はあるのに見えないときは、罫線の色が「白」になっている可能性があります。
範囲を選択し、ホーム タブ → 罫線ボタン → 「その他の罫線」 を開きます。
「線の色」→ 「自動」 を選び、そのあとで 「格子」 を選び直します。
線の色を決めてから罫線を引く、という順番が大切です。

④ 条件付き書式のルールを確認する

条件に合う行だけ罫線が消えるときは、条件付き書式が上書きしています。
ホーム タブ → 条件付き書式 → ルールの管理 を開き、該当のルールを確認・削除します。
ルールで「罫線を引く」を選んでいると、その書式がいちばん優先されます。

⑤ グリッド線の表示を確認する

そもそも罫線ではなく「グリッド線」を見ていた、というケースもあります。
表示 タブ → 目盛線 のチェックが外れていると、画面から格子が消えます。
目盛線にチェックを入れると、罫線のない部分のグレーの線が戻ります。

⑥ 印刷範囲を見直す

画面では見えているのに、印刷プレビューで消えるときは印刷範囲を疑います。
ページレイアウト タブ → 印刷範囲 → 「印刷範囲の解除」 を選ぶと、いったん全範囲が対象になります。
改めて 「印刷範囲の設定」 で必要な範囲を指定し直しましょう。
改ページプレビューで青い枠を確認すると、どこまで印刷されるかが一目でわかります。

STEP6. VBAで罫線を一括設定する

毎回手で罫線を引き直すのが手間なときは、VBAで一括設定するのがおすすめです。
Alt+F11でVBAエディターを開き、標準モジュールに次のコードを貼り付けます。

Sub DrawBorders()
    Dim r As Range
    Set r = Range("A1:D10")
    r.Borders.LineStyle = xlLineStyleNone   ' いったん罫線をすべて解除
    r.Borders.LineStyle = xlContinuous      ' 格子（細い実線）を引く
    r.Borders.Color = RGB(0, 0, 0)          ' 罫線の色を黒（自動相当）に戻す
    r.BorderAround LineStyle:=xlContinuous, Weight:=xlMedium  ' 外枠だけ太く
End Sub

コードのポイントは、いったん解除してから引き直すことです。
F5キーで実行すると、A1:D10に罫線が一瞬で引き直されます。
罫線の色も黒に戻るので、白い罫線で見えなくなっていたケースも直ります。
ボタンに登録しておけば、クリック1つで罫線を整えられます。

タカヒロ

VBAで直すときは、LineStyle = xlLineStyleNone でいったん白紙にしてから引くのがコツです。
先に色（RGB）を決めてから線を引くと、白い罫線で見えないトラブルも防げますよ。

罫線の設定方法の比較

罫線を引く・直す方法を、用途ごとに表にまとめました。

うまくいかないときの対処法（トラブルシュート）

実際に試すと、思ったように直らないこともあるかもしれません。
よくあるつまずきと対処法をまとめました。

機能・プロパティの説明

今回使う罫線まわりの機能とプロパティの概要です。
それぞれの違いを押さえておきましょう。

罫線（枠なし・格子）

書式のクリア（罫線が消える原因）

Borders.LineStyle（VBA）

Range("A1:D10").Borders.LineStyle = xlContinuous

Borders.Color（VBA）

BorderAround（VBA）

完成

消えていた罫線が、表のすべてにきれいに引き直されました。
VBAで直すと、罫線の色まで黒に戻るので、見えない罫線も一発で直ります。
思ったとおりに動きましたか？
印刷プレビューを開いて、罫線が印刷にも残っているか確認してみましょう。

さいごに

いかがでしょうか。

今回は、

についてまとめました。

罫線が消えるときは、まず 「書式のクリア」「白い塗りつぶし」「罫線の色」 の3つを疑ってください。
印刷プレビューでだけ消えるときは、印刷範囲を見直せば解決できます。
まずは今回のサンプル表で、ぜひ一度試してみてください。
また、他にも便利なExcelの時短テクニックがありますので、よろしければご参照頂ければと思います。

ぜひ試してみてください。