Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

外枠罫線の設定（BorderAround メソッド）

2015/08/15 2015/08/26

外枠罫線の設定

罫線の設定には、Borders プロパティを使用しますが、範囲内のすべての罫線に対して設定する必要があるのでコード量が多くなってしまします。
選択したセル範囲の外枠罫線のみを引く場合は、BorderAround メソッドが便利です。

BorderAround メソッド

【書式】

object.BorderAround [ ( LineStyle, Weight, ColorIndex, Color, ThemeColor ) ]

引数・戻り値

object ・・・対象となる Range オブジェクトを指定します。

LineStyle ・・・罫線の種類を表す定数（XlLineStyle 列挙型）または、その値を指定します。

定数	値	内容
xlContinuous	1	実線
xlDashDot	4	一点鎖線
xlDashDotDot	5	ニ点鎖線
xlSlantDashDot	13	斜破線
xlDash	-4115	破線
xlDot	-4118	点線
xlDouble	-4119	2 本線
xlLineStyleNone	-4142	線なし

Weight ・・・罫線の太さを表す定数（XlBorderWeight 列挙）または、その値を指定します。

定数値内容

xlMedium -4138 普通

xlHairline 1 細線 (最も細い罫線)

xlThin 2 極細

xlThick 4 太線 (最も太い罫線)
ColorIndex ・・・カラーパレットの色を表す 1 ～ 56 のパレット番号を指定します。
　　⇒ 色の設定：ColorIndex プロパティ・Colors プロパティ
Color ・・・色を表す RGB 値を指定します。
　　⇒ 色の設定：Color プロパティ・RGB 関数
ThemeColor ・・・テーマカラーの基本色を表すMsoThemeColorSchemeindex 列挙型の定数または値（1 ～ 12）を指定します。
　　⇒ 色の設定：ThemeColor プロパティ・TintAndShade プロパティ

BorderAround メソッド使用例

サンプルVBAソース

　
Sub Sample_BorderAround()


    'すでに設定されている罫線の外枠のみ変更
    Range("B2:F8").BorderAround Weight:=xlThick, LineStyle:=xlDouble, Color:=RGB(0, 0, 255)
    
    
    '指定した範囲の外枠罫線
    Range("B15:D20").BorderAround 1, 4, 18
    
    
End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

　

Sub Sample_BorderAround()

'すでに設定されている罫線の外枠のみ変更

Range("B2:F8").BorderAround Weight:=xlThick, LineStyle:=xlDouble, Color:=RGB(0, 0, 255)

'指定した範囲の外枠罫線

Range("B15:D20").BorderAround 1, 4, 18

End Sub

　

実行結果

サンプルVBAソース実行前

実行後

- セルの操作 BorderAround メソッド, Range オブジェクト, VBA基本, エクセルVBA, セルの操作, 外枠罫線の設定

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 対象のセル・セル範囲に数式があるかどうか調べる（HasFormula プロパティ）

HasFormula プロパティ HasFormula プロパティは、対象のセル …

: 直前のセル・直後のセルを参照する（Previous プロパティ・Next プロパティ）

Previous プロパティ・Next プロパティ Previous プロパティ …

: 数式を設定・取得する（Formula プロパティ・FormulaR1C1 プロパティ）

Formula プロパティ（FormulaR1C1 プロパティ） Formula …

: オートフィルタ（抽出件数の取得・結果集計）AutoFilter メソッド

ワークシート関数の Subtotal 関数の使い方 VBA には、オートフィル …

: フリガナの設定（Characters プロパティ,PhoneticCharacters メソッド）

Characters プロパティ Characters プロパティは、文字範囲を …

: 行の高さを取得・設定・する（RowHeight プロパティ）

RowHeight プロパティ RowHeight プロパティは、対象セルの高さ …

: 列名を取得、列番号を取得（Address プロパティ,Column プロパティ）

列番号を取得するセル番地（「A1」や「B3」）や列名（「A」「B」「C」&#8 …

: セル範囲を結合・結合を解除（Merge メソッド・UnMerge メソッド）

Merge メソッド・UnMerge メソッドセルを結合するには、指定したセル …

: セルのアドレスを確認（Address プロパティ）

Address プロパティ Address プロパティ・AddressLocal …

: セルの高さ・幅を取得（Height プロパティ・Width プロパティ）

Height プロパティ・Width プロパティ Height プロパティは、指 …

PREV: データをクリアする（ClearContents メソッド）
NEXT: 対象のオブジェクトをクリアする（Clear メソッド）