Excel VBAで簡単にセルの外周に罫線を追加する方法：BorderAroundメソッドの使い方

この記事では、Excel VBAのBorderAroundメソッドを使って、セルの外周に簡単かつ効果的に罫線を引く方法を詳しく解説します。

Excelでセルの外周だけに罫線を引くにはどうしたらいいの？

Excel VBAのBorderAroundメソッドを使えば、簡単にセルの外周に罫線を引くことができますよ。このメソッドは、指定したセル範囲の外周に罫線を追加するのに最適です。

BorderAroundメソッドとは

Excel VBAにおける「BorderAroundメソッド」は、セルやセル範囲の外周に罫線を引くための非常に便利な機能です。このメソッドは、特定のセル範囲を選択し、その範囲の外側の境界に罫線を追加することができます。

主に、データの視認性を高めたり、特定のデータを強調表示するために使用されます。

Range("選択範囲").BorderAround LineStyle, Weight, ColorIndex

• LineStyle: 罫線のスタイルを指定します。例えば、xlContinuous、xlDash、xlDotなどがあります。
• Weight: 罫線の太さを指定します。例えば、xlThin、xlMedium、xlThickなどがあります。
• ColorIndex: 罫線の色を指定します。色はExcelのカラーインデックス番号で指定します。

Sub AddBorder()
    With Worksheets("Sheet1").Range("B2:D4")
        .BorderAround LineStyle:=xlContinuous, Weight:=xlMedium, ColorIndex:=1
    End With
End Sub

この例では、シート1のB2からD4までの範囲に、連続した線（xlContinuous）、中間の太さ（xlMedium）、黒色（ColorIndex 1）の外周罫線が追加されます。

サンプルプログラム

Excel VBAのBorderAroundメソッドを利用したサンプルプログラムを以下に示します。この例では、特定のセル範囲に罫線を追加し、その見た目をカスタマイズする方法を紹介します。

Sub AddBordersToCells()
    ' シートの指定と範囲選択
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Sheets("MySheet")

    ' 罫線を追加する範囲の指定
    Dim targetRange As Range
    Set targetRange = ws.Range("B2:D4")

    ' 罫線の追加
    With targetRange
        ' 外周に罫線を追加
        .BorderAround LineStyle:=xlDash, Weight:=xlMedium, ColorIndex:=3

        ' セルの内側にも罫線を追加（オプション）
        .Borders(xlInsideVertical).LineStyle = xlDot
        .Borders(xlInsideVertical).Color = RGB(0, 0, 255)
        .Borders(xlInsideHorizontal).LineStyle = xlDot
        .Borders(xlInsideHorizontal).Color = RGB(0, 0, 255)
    End With
End Sub

• シートと範囲の設定: 最初に、操作するワークシートと、罫線を追加するセル範囲を指定します。
• 外周の罫線の設定: BorderAround メソッドを用いて、選択した範囲の外周に罫線を追加します。ここでは、線のスタイルを破線(xlDash)、太さを中程度(xlMedium)、色を赤(ColorIndex:=3)に設定しています。
• 内側の罫線の設定（オプション）: 範囲内のセル間に水平および垂直の罫線を追加します。この例では、内側の罫線を点線(xlDot)で、青色(RGB(0, 0, 255))に設定しています。

このサンプルプログラムは、ExcelのVBA環境で実行することができ、セルの外周に罫線を効果的に追加する方法を示しています。プログラムは自由にカスタマイズして、さまざまなニーズに合わせることが可能です。

まとめ

Excel VBAのBorderAroundメソッドを使って、セルの外周に簡単かつ効果的に罫線を引く方法を解説しました。

BorderAroundメソッドの基本から応用まで、非常にわかりやすく説明されていて、今すぐにでも使ってみたいと思います。

Excel VBAのBorderAroundメソッドの基本と応用について理解していただけたことと思います。

このメソッドは、単にセルに罫線を追加するだけではなく、レポートやデータシートの見た目をプロフェッショナルに整えるためにも非常に役立ちます。