罫線オブジェクト (Excel)

Range、Style、または FormatCondition オブジェクトの 4 つの縁取りを表す 4 つの Border オブジェクトのコレクション。

注釈

4 つの罫線すべてが属している Borders コレクションを取得するには、Borders プロパティを使用します。 セルまたは範囲の両側に異なる罫線を適用できます。 セル範囲に罫線を適用する方法の詳細については、 Range.Borders プロパティを参照してください。

Range、Style、および FormatCondition の各オブジェクトを使用すると、個々の罫線の罫線プロパティを設定できます。 エラー範囲や直列線など、その他の境界線のあるオブジェクトには、辺の数に関係なく、1 つのエンティティとして扱われる境界線があります。 これらのオブジェクトについては、罫線全体のプロパティを単位として返し、設定する必要があります。 詳細については、Border オブジェクトを参照してください。

例

次の使用例は、ワークシート 1 のセル A1 の下側の罫線を二重線に設定します。

Worksheets(1).Range("A1").Borders.LineStyle = xlDouble

Borders (index) を使用します。ここで、index は罫線を識別し、単一の Border オブジェクトを返します。 インデックスの有効な値は、Borders コレクションの親オブジェクトによって決まります。 Range.Borders および Style.Borders の場合、index は XlBordersIndex 定数として、xlDiagonalDown、xlDiagonalUp、xlEdgeBottom、xlEdgeLeft、xlEdgeRight、xlEdgeTop、xlInsideHorizontal、または xlInsideVertical のいずれかを指定できます。 FormatCondition.Borders の場合は、xlLeft、xlRight、xlTop、または xlBottom を使用します。

次の例では、セル A1:G1 の下側の境界線の色を赤に設定します。

Worksheets("Sheet1").Range("A1:G1"). _ 
 Borders(xlEdgeBottom).Color = RGB(255, 0, 0)

次の例では、範囲内のすべてのセルの周囲に細い境界線を生成します。

Dim rng As Range: Set rng = ws.Range("B6", "D8")
        
With rng.Borders
   .LineStyle = xlContinuous
   .Weight = xlThin
End With

次の例では、範囲内の内側のセルの境界線のみを変更します。

Dim rngInner As Range: Set rngInner = ws.Range("B2", "D4")
        
With rngInner.Borders(xlInsideHorizontal)
  .LineStyle = xlContinuous
  .Weight = xlThin
End With

With rngInner.Borders(xlInsideVertical)
  .LineStyle = xlContinuous
  .Weight = xlThin
End With

プロパティ

関連項目

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。

  • 最終更新: