[[20260109101825]]　『セルにデータがない時、セルの罫線（外枠）を消す』（ざっくばらん）　ページの最後に飛ぶ

『セルにデータがない時、セルの罫線（外枠）を消す方法』（ざっくばらん）

教えてください。
セルに数式が入っているのですが、数値がゼロの時はＩＦを使って
空白になるように設定しています。
そのセルは罫線で枠を作っているのですが、
最終的に、セルが空白ならば罫線を消したいのです。
何かマクロ等を使って消す方法はありますか？
よろしくお願いします。

＜使用 Excel：Excel2013、使用 OS：Windows10 ＞

条件付き書式を設定されれはいかがでしょう。

そのセルを仮に「A1]とします。

条件付き書式を「数式で」設定します。

数式:　=$A$1<>0

書式設定で「罫線」を設定します。

（メジロ） 2026/01/09(金) 10:38:55

返信ありがとうございます。
条件付き書式を「数式で」とありますが、
「条件付き書式」を選択すると、色々項目がありますが「数式」？というのがありません。
私の見た「条件付き書式」は違っているのでしょうか。
ほとんど素人に近いので申し訳ないですが、もう少し詳細に教えていただくことはできませんか。
お願いします。

（ざっくばらん） 2026/01/09(金) 11:00:45

すいません　わかりましたありがとうございました。
（ざっくばらん） 2026/01/09(金) 11:07:17

解決されたようですので参考まで。

■１
条件付き書式で設定できる罫線は、普通の罫線と比べて選択できるものが限られています。
（斜線とか太線が使えない）
したがって、そのあたりを使いたいのであれば、マクロというアプローチになろうかとおもいます。

■２

 ＞セルに数式が入っているのですが、数値がゼロの時はＩＦを使って空白になるように設定

細かいことをいうと空白ではなく「""（文字数0の文字列）」が入っています。

■３
したがって、仮にマクロで行うのであれば、数式の結果が【文字列】のセルの罫線を削除というコードを作成すればよいです。

    Sub さんぷる()
        On Error Resume Next
        Range("A1,B2,C3,D4,E5").SpecialCells(xlCellTypeFormulas, 2).Borders.LineStyle = xlNone
        On Error GoTo 0
    End Sub

ただし、SpecialCellsを使う場合、以下の点に注意が必要です。

 ・Range("A1").SpecialCells～のように単一のセルを指定すると、勝手に全セルを指定したと読み替えられる
 ・該当するセルがない場合、処理ができず実行時エラーになるので、提示例のようにエラー対策が必要

■４
ループ処理などで素直に１セルずつ判定していくのであれば「■３」のようなことは考慮しなくていいので、マクロの処理を希望するのであれば、【まずはご自身が考えたコードを示し】どこがうまくいかないのか説明されるとアドバイスが得られたかと思います。

（もこな２） 2026/01/09(金) 12:50:45

コメント返信：

[ 一覧(最新更新順) ]

[[20260109101825]] 『セルにデータがない時、セルの罫線（外枠）を消す』（ざっくばらん） ページの最後に飛ぶ

[[20260109101825]]　『セルにデータがない時、セルの罫線（外枠）を消す』（ざっくばらん）　ページの最後に飛ぶ