共用方式為

Border 物件 (Excel)

代表物件的框線。

註解

除了 Range 和 Style 物件之外，大多數有框線的物件) (都有被視為單一實體的框線，無論它有多少邊。 必須以單位傳回的整個花邊。

使用 Border 屬性 （例如來自 TrendLine 物件） 來傳回這類物件的 Border 物件。

請注意， Border 物件的視覺屬性是互鎖的;也就是說，更改一個屬性可能會導致另一個屬性發生變化。 在大多數情況下，誘導的變化有助於使邊界可見 (這可能是可取的，也可能不是可取的) 。 然而，其他 (更意想不到的) 結果是可能的。

以下是與非預期結果互鎖的範例。 在此範例中，將框線的 Weight 屬性設定為 xlThick 會導致 LineStyle 屬性變成 xlSolid，儘管先前已將它設定為 xlDashDotDot。

   Sub InterlockingExample()
       Dim SomeRange As Range
       Dim SomeBorder As Border
       
       Set MyRange = Selection
       Set SomeBorder = MyRange.Borders(xlDiagonalDown)
       SomeBorder.Color = RGB(255, 0, 0)
       Debug.Print "SomeBorder.LineStyle = " & SomeBorder.LineStyle   'SomeBorder.LineStyle = 1
       Debug.Print "Set SomeBorder.LineStyle = xlDashDotDot"          'Set SomeBorder.LineStyle = xlDashDotDot
       SomeBorder.LineStyle = xlDashDotDot
       Debug.Print "SomeBorder.LineStyle = " & SomeBorder.LineStyle   'SomeBorder.LineStyle = 5
       Debug.Print "Set SomeBorder.Weight = xlThick"                  'Set SomeBorder.Weight = xlThick
       SomeBorder.Weight = xlThick
       Debug.Print "SomeBorder.LineStyle = " & SomeBorder.LineStyle   'SomeBorder.LineStyle = 1
   End Sub

範例

下列範例會變更現用圖表上趨勢線的類型及線條樣式。

With ActiveChart.SeriesCollection(1).Trendlines(1) 
 .Type = xlLinear 
 .Border.LineStyle = xlDash 
End With

Range 和 Style 物件有四個離散框線 （左、右、上和下），可以個別或群組傳回。 使用 Borders 屬性可以傳回 Borders 集合，該集合包含所有的四個框線，並且將這些框線視為一體。 下列範例會在第一張工作表上的 A1 儲存格中新增雙框線。

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

使用 Borders (索引) （ 其中 index 識別框線） 來傳回單一 Border 物件。 下列範例會設定 A1:G1 儲存格下框線的色彩。

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

Index 可以是下列其中一個 XlBordersIndex 常數： xlDiagonalDown、 xlDiagonalUp、 xlEdgeBottom、 xlEdgeLeft、 xlEdgeRight、 xlEdgeTop、 xlInsideHorizontal 或 xlInsideVertical。

屬性

另請參閱

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。

  • Last updated on