Border-Objekt (Excel)
Stellt den Rahmen eines Objekts dar.
Hinweise
Die meisten Umrandungsobjekte (alle mit Ausnahme der Range - und Style-Objekte ) verfügen über einen Rahmen, der als einzelne Entität behandelt wird, unabhängig davon, wie viele Seiten sie hat. Der gesamte Rahmen muss als Einheit zurückgegeben werden.
Verwenden Sie die Border-Eigenschaft , z. B. aus einem TrendLine-Objekt , um das Border-Objekt für diese Art von Objekt zurückzugeben.
Beachten Sie, dass die visuellen Eigenschaften eines Border-Objekts miteinander verbunden sind. Das heißt, das Ändern einer Eigenschaft kann Änderungen in einer anderen bewirken. In den meisten Fällen dienen die induzierten Änderungen dazu, den Rahmen sichtbar zu machen (was wünschenswert sein kann oder auch nicht). Es sind jedoch andere (unerwartetere) Ergebnisse möglich.
Es folgt ein Beispiel für die Verzahnung mit unerwarteten Ergebnissen. In diesem Beispiel bewirkt das Festlegen der Weight-Eigenschaft eines Rahmens auf xlThick, dass die LineStyle-Eigenschaft zu xlSolid wird, obwohl sie zuvor auf xlDashDotdot festgelegt wurde.
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
Beispiel
Im folgenden Beispiel werden der Typ und die Linienart einer Trendlinie im aktiven Diagramm geändert.
With ActiveChart.SeriesCollection(1).Trendlines(1)
.Type = xlLinear
.Border.LineStyle = xlDash
End With
Range- und Style-Objekte haben vier separate Rahmen – links, rechts, oben und unten – die einzeln oder als Gruppe zurückgegeben werden können. Verwenden Sie die BordersBorders-Eigenschaft, um die Borders-Auflistung zurückzugeben, die alle vier Rahmen enthält. Im folgenden Beispiel erhält die Zelle A1 im ersten Arbeitsblatt eine Doppellinie als Rahmen.
Worksheets(1).Range("A1").Borders.LineStyle = xlDouble
Verwenden Sie Rahmen (Index), wobei index den Rahmen identifiziert, um ein einzelnes Border-Objekt zurückzugeben. Im folgenden Beispiel wird die Farbe des unteren Rahmens der Zellen A1:G1 festgelegt.
Worksheets("Sheet1").Range("A1:G1"). _
Borders(xlEdgeBottom).Color = RGB(255, 0, 0)
Index kann eine der folgenden XlBordersIndex-Konstanten sein: xlDiagonalDown, xlDiagonalUp, xlEdgeBottom, xlEdgeLeft, xlEdgeRight, xlEdgeTop, xlInsideHorizontal oder xlInsideVertical.
Eigenschaften
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.