閱讀英文

共用方式為


Excel) (Borders 物件

四個 Border 物件的集合,代表 Range 物件或 Style 物件的四個框線。

註解

使用 Borders 屬性可傳回 Borders 集合,該集合包含所有的四個框線。 您可以將不同的框線套用到儲存格或範圍的每一邊。 如需如何將框線套用至儲存格範圍的詳細資訊,請參閱 Range.Borders 屬性。

只有使用 RangeStyle 物件時,才能設定個別框線的框線內容。 其他框線物件,例如誤差線和數列線,其框線會被視為單一實體,而不論其有多少邊。 如果是這些物件,必須將整個框線當做一個單位傳回或設定屬性。 如需詳細資訊,請參閱 Border 物件。

範例

下列範例會在第一張工作表上的 A1 儲存格中新增雙框線。

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

使用 Borders (索引) ,其中 index 可識別框線,以傳回單一 Border 物件。 Index 可以是下列其中一個 XlBordersIndex 常數: xlDiagonalDownxlDiagonalUpxlEdgeBottomxlEdgeLeftxlEdgeRightxlEdgeTopxlInsideHorizontalxlInsideVertical

下列範例會將 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 支援與意見反應