ExcelWork.info

Excel(エクセル)のマクロ・VBA・関数・操作などのメモ

罫線の設定(Borders プロパティ)

      2015/08/26

罫線の設定

罫線を一括(上下左右すべて)で設定するには、Borders プロパティを使用します。単体の Border オブジェクトを取得するには、Borders(index) プロパティを使用します。これにより、各罫線(上下左右他)それぞれの設定をすることができます。(index には、罫線を示す定数を指定します。)
設定する主な内容は以下のとおりです。

  • 罫線の種類(LineStyle プロパティ
  • 罫線の太さ(Weight プロパティ
  • 罫線の色(Color プロパティ
  • 罫線の色(ThemeColor プロパティ
  • 罫線の基本色(ColorIndex プロパティ
  • 罫線の色の明るさ(TintAndShade プロパティ


Borders.Item プロパティ

BordersItem プロパティは、既定のプロパティになっているため、Item キーワードを省略することができます。

【書式】

object.Borders ( index )

object.Borders.Item ( index )


引数・戻り値

  • object  ・・・  対象となる Range オブジェクトを指定します。
  • index  ・・・  罫線を示す定数(XlBordersIndex 列挙)を指定します。
    定数 内容
    xlDiagonalDown 5 範囲内の各セルの左上隅から右下への罫線
    xlDiagonalUp 6 範囲内の各セルの左下隅から右上への罫線
    xlEdgeLeft 7 範囲内の左端の罫線
    xlEdgeTop 8 範囲内の上側の罫線
    xlEdgeBottom 9 範囲内の下側の罫線
    xlEdgeRight 10 範囲内の右端の罫線
    xlInsideVertical 11 範囲内のすべてのセルの垂直罫線
    xlInsideHorizontal 12 範囲内のすべてのセルの水平罫線


上の罫線の種類を2重線に設定する
 Range(“C2”).Borders(xlEdgeTop).LineStyle = xlDouble

罫線(上下左右すべて)を破線に設定する
 Range(“C2”).Borders.LineStyle = xlDash


LineStyle プロパティ

罫線の種類を設定します。値の取得および設定が可能です。取得の場合、罫線の種類を表す定数の値を返します。

【書式】

object.LineStyle = const


引数・戻り値

  • object  ・・・  対象となる Borders オブジェクトを指定します。
  • const  ・・・  罫線の種類を表す定数(XlLineStyle 列挙)を指定します。
    定数 内容
    xlContinuous 1 実線
    xlDashDot 4 一点鎖線
    xlDashDotDot 5 ニ点鎖線
    xlSlantDashDot 13 斜破線
    xlDash -4115 破線
    xlDot -4118 点線
    xlDouble -4119 2 本線
    xlLineStyleNone -4142 線なし


上記定数以外にも xlGray25xlGray50xlGray75xlAutomatic も指定可能です。


Weight プロパティ

罫線の太さを設定します。値の取得および設定が可能です。取得の場合、罫線の太さを表す定数の値を返します。

【書式】

object.Weight = const


引数・戻り値

  • object  ・・・  対象となる Borders オブジェクトを指定します。
  • const  ・・・  罫線の太さを表す定数(XlBorderWeight 列挙)を指定します。
    定数 内容
    xlMedium -4138 普通
    xlHairline 1 細線 (最も細い罫線)
    xlThin 2 極細
    xlThick 4 太線 (最も太い罫線)

罫線の色を設定する

Color プロパティColorIndex プロパティThemeColor プロパティ・TintAndShade プロパティなどを使用して罫線の色を設定します。いずれものプロパティも、値の取得および設定が可能です。

【書式】

object.Color = rgb

object.ColorIndex = c_index

object.ThemeColor = t_index

object.TintAndShade = single


引数・戻り値



Borders プロパティ 使用例

サンプルVBAソース


実行結果

Borders プロパティ 例


 - セルの操作 , , , , , , , ,

Message

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

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

  関連記事

セルを削除する(Delete メソッド)

Delete メソッド Delete メソッドで、指定したセル・セル範囲を削除し …

行の高さを取得・設定・する(RowHeight プロパティ)

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

AutoFill メソッド 使用例 1
連続データを入力する(AutoFill メソッド)

AutoFill メソッド Excel で、連続するデータを入力する「オートフィ …

Locked プロパティ
セルのロック(Locked プロパティ)

セルのロック(Locked プロパティ) Locked プロパティで、セルのロッ …

セル内の編集を禁止する(EditDirectlyInCell プロパティ)

EditDirectlyInCell プロパティ エクセルでは、セルをダブルクリ …

入力規則(他セルや数式を利用して許容値を設定)Validation オブジェクト

他のセルや数式を利用して許容値を設定する 入力規則(その5) での設定を、マクロ …

直前のセル・直後のセルを参照する(Previous プロパティ・Next プロパティ)

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

RemoveDuplicates メソッド 使用例1a
重複するデータを削除(RemoveDuplicates メソッド)

RemoveDuplicates メソッド 指定したセル範囲から重複データを含む …

対象のセルを直接参照しているセル全てを取得(DirectDependents プロパティ)

DirectDependents プロパティ DirectDependents …

別シートのセルを選択(Goto メソッド / PreviousSelections プロパティ)

Goto メソッド 次の例のように、1 行で、Activate メソッド や S …