目次
概要
Excelでは、セルに罫線を引いて見やすく整える作業がよく行われます。マウス操作でも可能ですが、範囲が広い場合や繰り返し作業が必要な場合は、VBAによる自動化が非常に有効です。
本記事では、VBAを使ってセルに罫線を引く方法を２つのパターンに分けてご紹介いたします。
- セル内のすべての境界線に罫線を引く方法
- セル範囲の外枠だけに罫線を引く方法
サンプルコード
Sub ApplyBordersToCells()
' 方法①：セル範囲のすべての枠線に罫線を引く
Range("C3:E5").Borders.LineStyle = xlContinuous
' 方法②：セル範囲の外枠だけに罫線を引く
Range("C8:E10").BorderAround Weight:=xlMedium
End Sub
コード解説
方法①：すべての境界線に罫線を引く
Range("C3:E5").Borders.LineStyle = xlContinuous
- 指定したセル範囲（例：C3～E5）の上下左右すべての境界線に、通常の実線（
xlContinuous）の罫線を引きます。 LineStyleにはxlDash（破線）やxlDot（点線）なども指定可能です。
方法②：外枠だけに罫線を引く
Range("C8:E10").BorderAround Weight:=xlMedium
- 指定したセル範囲の外側の枠線だけに罫線を設定します。
Weight:=xlMediumにより、やや太めの線が引かれます。他にはxlThin（細線）やxlThick（太線）なども使用可能です。
応用例
- 集計表の各ブロックを区切る装飾として利用
- 入力欄の範囲を明示的に示すための強調
- 印刷時に見やすいレイアウトを作成する際の整形処理
注意点
.Bordersを使用すると、すべての罫線（内側・外側）に適用されます。- 外枠だけにしたい場合は
.BorderAroundを使用する方が適切です。 - 複数の範囲に異なる罫線スタイルを適用したい場合は、
Borders(xlEdgeTop)などの個別指定も可能です。
まとめ
本記事では、Excel VBAを使ってセルに罫線を引く２つの方法をご紹介いたしました。
| 方法 | 特徴 |
|---|---|
.Borders.LineStyle | 範囲内のすべてのセル境界線に罫線 |
.BorderAround | 範囲の外枠のみに罫線 |
VBAによる罫線の自動化は、表の整形作業を効率化するだけでなく、見た目の統一にも役立ちます。
技術書の購入コストを抑えてスキルアップするなら
ここまで読んでいただきありがとうございます。最後に宣伝をさせてください。
プログラミングの技術書や参考書は、1冊3,000円〜5,000円するものも多く、出費がかさみがちです。Kindle Unlimitedであれば、月額980円で500万冊以上の書籍が読み放題となります。
気になる言語の入門書から、アルゴリズム、基本設計の専門書まで、手元のスマホやPCですぐに参照可能です。現在は「30日間の無料体験」や、対象者限定の「3か月499円プラン」なども実施されています。まずはご自身のアカウントでどのようなオファーが表示されるか確認してみてください。
