Excel VBAの覚え書（[セルの書式設定]-[罫線](Bordersプロパティ)編）

2022-03-132024-01-07

■RangeオブジェクトのBordersプロパティ

罫線に関する処理を行う場合、Bordersコレクション(またはBorderオブジェクト)のプロパティを使用します。

Bordersコレクション(またはBorderオブジェクト)は、RangeオブジェクトのBordersプロパティで取得します。

Bordersプロパティの詳細

Microsoftのサイトで「Bordersプロパティ」を調べると、以下のように記載されています。

スタイルの罫線またはセル範囲(条件付き書式の一部として定義された範囲を含む)を表すBordersコレクションを返します。

また、オブジェクト・ブラウザでBordersプロパティを参照すると以下のように定義されており、何も引数を指定することなく、Bordersオブジェクトを取得できることがわかります。

Property Borders As Borders

■Bordersコレクション、Borderオブジェクトの詳細

BordersコレクションとBorderオブジェクトのプロパティはほとんど同じなので、1つの表にまとめて掲載します(メソッドはありません)。

(Bordersコレクション、Borderオブジェクトのプロパティ)

Applicationプロパティ(読み取り専用)
説明	Applicationオブジェクト(Excel)を取得
定義	Property Application() As Application
Colorプロパティ
説明	罫線の色をRGB値で設定/取得
定義	Property Color() As Variant
ColorIndexプロパティ
説明	罫線の色をカラー・パレットのインデックスで設定/取得 (※)カラー・パレット番号またはXlColorIndex列挙体を使用可能。 XlColorIndex列挙体は、以下の通り。 xlColorIndexAutomatic(-4105):自動設定 xlColorIndexNone(-4142) :色なし
定義	Property ColorIndex() As Variant
Countプロパティ(読み取り専用)(Bordersコレクションのみ)
説明	コレクションに含まれるオブジェクトの数を取得
定義	Property Count() As Long
Creatorプロパティ(読み取り専用)
説明	オブジェクトを作成したアプリケーションの整数値を取得 (※)XlCreator列挙体は、以下の値のみ。 xlCreatorCode(1480803660):Macintosh版Excelでのシグネチャ
定義	Property Creator() As XlCreator
Itemプロパティ(読み取り専用)(Bordersコレクションのみ)
説明	セル範囲またはスタイルのいずれかの罫線を表すBorderオブジェクトを取得 (※)XlBordersIndex列挙体は、以下の通り。 xlDiagonalDown(5) :範囲内の各セルの左上隅から右下に移動する罫線 xlDiagonalUp(6) :範囲の各セルの左下隅から右上隅に移動する罫線 xlEdgeBottom(9) :範囲内の下側の罫線 xlEdgeLeft(7) :範囲の左側の罫線 xlEdgeRight(10) :範囲の右端の罫線 xlEdgeTop(8) :範囲内の上側の罫線 xlInsideHorizontal(12):範囲外の罫線を除く、範囲内のすべてのセルの水平罫線 xlInsideVertical(11) :範囲外の罫線を除く、範囲内のすべてのセルの垂直罫線
定義	Property Item(Index As XlBordersIndex) As Border
LineStyleプロパティ
説明	罫線または輪郭線の種類を設定/取得 (※)XlLineStyle列挙体は、以下の通り。 xlContinuous(1) :実線 xlDash(-4115) :破線 xlDashDot(4) :一点鎖線 xlDashDotDot(5) :ニ点鎖線 xlDot(-4118) :点線 xlDouble(-4119) :2本線 xlLineStyleNone(-4142):線なし xlSlantDashDot(13) :斜破線その他にxlGray25(25%灰色)、xlGray50(50%灰色)、xlGray75(75%灰色)、xlAutomatic(自動)を指定可能。
定義	Property LineStyle() As XlLineStyle
Parentプロパティ(読み取り専用)
説明	指定されたオブジェクトの親オブジェクトを取得
定義	Property Parent() As Object
ThemeColorプロパティ
説明	指定したオブジェクトに適用する配色のテーマの色を設定/取得 (※)XlThemeColor列挙体は、以下の通り。 xlThemeColorAccent1(5) :Accent1 xlThemeColorAccent2(6) :Accent2 xlThemeColorAccent3(7) :Accent3 xlThemeColorAccent4(8) :Accent4 xlThemeColorAccent5(9) :Accent5 xlThemeColorAccent6(10) :Accent6 xlThemeColorDark1(1) :Dark1 xlThemeColorDark2(3) :Dark2 xlThemeColorFollowedHyperlink(12):表示済みのハイパーリンク xlThemeColorHyperlink(11) :ハイパーリンク xlThemeColorLight1(2) :Light1 xlThemeColorLight2(4) :Light2
定義	Property ThemeColor() As XlThemeColor
TintAndShadeプロパティ
説明	色を明るく、または暗くする単精度浮動小数点型(Single)の値を設定/取得
定義	Property TintAndShade() As Variant
Valueプロパティ(Bordersコレクションのみ)
説明	罫線または輪郭線の種類を設定/取得(LineStyleプロパティと同様)
定義	Property Value() As XlLineStyle
Weightプロパティ
説明	罫線の重みを表す値を設定/取得 (※)XlBorderWeight列挙体は、以下の通り。 xlHairline(1) :細線(最も細い罫線) xlMedium(-4138):普通 xlThick(4) :太線(最も太い罫線) xlThin(2) :極細
定義	Property Weight() As XlBorderWeight

■Bordersコレクション、Borderオブジェクトの使用方法

基本的な使用法は、以下の通りです。

格子状に罫線を引く

BordersコレクションのLineStyleプロパティに線種を設定することにより、格子状に罫線を引くことができます。

sht.UsedRange.Borders.LineStyle = xlContinuous

外枠の罫線を引く

BordersコレクションのLineStyleプロパティで設定可能ですが、1本ずつ罫線を引く必要があって面倒なので、RangeオブジェクトのBorderAroundメソッドを使用します。

(BorderAroundメソッドの定義)

BorderAroundメソッド
説明	範囲に罫線を追加し、新しい罫線のBorderオブジェクトのColorプロパティ、LineStyleプロパティ、Weightプロパティを設定する
定義	Function BorderAround([LineStyle], [Weight As XlBorderWeight = xlThin], [ColorIndex As XlColorIndex = xlColorIndexAutomatic], [Color], [ThemeColor])