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 支援與意見反應。