Klasse Border (Word VBA)

Die Klasse Border stellt den Rahmen eines Objekts dar.

Set

Um eine Border -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

Dim brd as Border
Set brd = Selection.Borders(Index:=1)

Die folgenden Prozeduren können zum Festlegen der Border Klassenvariablen verwendet werden : Borders.Item, Cell.Borders, Cells.Borders, Column.Borders, Columns.Borders, ConditionalStyle.Borders, Font.Borders, Frame.Borders, HTMLDivision.Borders, InlineShape.Borders, Paragraph.Borders, ParagraphFormat.Borders, Paragraphs.Borders, Range.Borders, Row.Borders, Rows.Borders, Section.Borders, Selection.Borders, Style.Borders, Table.Borders und TableStyle.Borders

For Each

Hier ist ein Beispiel für die Verarbeitung der Border -Elemente in einer Sammlung

Dim brd As Border
For Each brd In Selection.Borders
	    If brd.Inside = True Then brd.LineStyle = wdLineStyleSingle 
Next brd

Themas

Die folgenden Prozeduren in dieser Klasse wurden zusammengefasst und auf eine separate Themenseite beschrieben

Enable with its procedures Borders.Enable, Borders.EnableFirstPageInSection und Borders.EnableOtherPagesInSection

Eigenschaften

ArtStyle Gibt das Design eines grafischen Seitenrahmens für ein Dokument zurück oder legt es fest.

Selection.Borders(1).ArtStyle = wdArtApples

ArtWidth Gibt die Breite (in Punkt) des angegebenen grafischen Seitenrahmens zurück oder legt sie fest.

Selection.Borders(1).ArtWidth =

Color Gibt die 24-Bit-Farbe für das angegebene Border -Objekt zurück oder legt Sie fest.

Selection.Borders(1).Color = RGB(0,0,255)'blue

ColorIndex Gibt die Farbe für das angegebene Rahmen- oder Schriftartobjekt zurück oder legt sie fest.

Selection.Borders(1).ColorIndex = wdAuto

Inside True, wenn das angegebene Objekt mit einem Innenrahmen versehen werden kann.

Dim booInside As Boolean
booInside = Selection.Borders(1).Inside

LineStyle Gibt die Rahmenart für das angegebene Objekt zurück oder legt sie fest.

Selection.Borders(1).LineStyle = wdLineStyleDashDot

LineWidth Gibt die Linienstärke des Rahmens eines Objekts zurück oder legt sie fest.

Selection.Borders(1).LineWidth = wdLineWidth025pt

Parent Gibt ein Object zurück, welches das übergeordnete Objekt des angegebenen Border-Objekts repräsentiert.

Dim objParent As Object
Set objParent = Selection.Borders(1).Parent

Visible True, wenn das angegebene Objekt sichtbar ist.

Selection.Borders(1).Visible = True

Borders.AlwaysInFront True, wenn Rahmen vor dem Dokumenttext angezeigt werden.

Selection.Borders.AlwaysInFront = True

Borders.Count Gibt die Anzahl der in der Borders-Auflistung enthaltenen Elemente zurück.

Dim lngCount As Long
lngCount = Selection.Borders.Count

Borders.DistanceFrom Gibt einen Wert zurück, der angibt, ob der angegebene Seitenrahmen vom Seitenrand oder von dem umgebenden Text gemessen wird, oder legt diesen fest.

Selection.Borders.DistanceFrom = wdBorderDistanceFromPageEdge

Borders.DistanceFromBottom Gibt den Abstand (in Punkt) zwischen Text und dem unteren Rahmen zurück oder legt ihn fest.

Selection.Borders.DistanceFromBottom =

Borders.DistanceFromLeft Gibt den Abstand (in Punkt) zwischen dem Text und dem linken Rand zurück oder legt ihn fest.

Selection.Borders.DistanceFromLeft =

Borders.DistanceFromRight Gibt den Abstand (in Punkt) zwischen der rechten Textkante und dem rechten Rahmen zurück oder legt ihn fest.

Selection.Borders.DistanceFromRight =

Borders.DistanceFromTop Gibt den Abstand (in Punkt) zwischen Text und oberem Rahmen zurück oder legt ihn fest.

Selection.Borders.DistanceFromTop =

Borders.HasHorizontal True, wenn einem Objekt ein horizontaler Rahmen zugewiesen werden kann.

Dim booHasHorizontal As Boolean
booHasHorizontal = Selection.Borders.HasHorizontal

Borders.HasVertical True, wenn dem angegebenen Objekt ein vertikaler Rahmen zugewiesen werden kann.

Dim booHasVertical As Boolean
booHasVertical = Selection.Borders.HasVertical

Borders.InsideColor Gibt die 24-Bit-Farbe der Innenrahmen zurück oder legt sie fest.

Selection.Borders.InsideColor = RGB(0,0,255)'blue

Borders.InsideColorIndex Gibt die Farbe der Innenrahmen zurück oder legt sie fest.

Selection.Borders.InsideColorIndex = wdAuto

Borders.InsideLineStyle Gibt den inneren Rahmen für das angegebene Objekt zurück oder legt ihn fest.

Selection.Borders.InsideLineStyle = wdLineStyleDashDot

Borders.InsideLineWidth Gibt die Linienstärke des Innenrahmens eines Objekts zurück oder legt diese fest.

Selection.Borders.InsideLineWidth = wdLineWidth025pt

Borders.JoinBorders True, wenn vertikale Rahmen an den Rändern von Absätzen und Tabellen entfernt werden, um horizontale Rahmen mit dem Seitenrahmen verbinden zu können.

Selection.Borders.JoinBorders = True

Borders.OutsideColor Gibt die 24-Bit-Farbe der äußeren Rahmenlinien zurück oder legt Sie fest.

Selection.Borders.OutsideColor = RGB(0,0,255)'blue

Borders.OutsideColorIndex Gibt die Farbe der äußeren Rahmenlinien zurück oder legt diese Farbe fest.

Selection.Borders.OutsideColorIndex = wdAuto

Borders.OutsideLineStyle Gibt den äußeren Rahmen für das angegebene Objekt zurück oder legt ihn fest.

Selection.Borders.OutsideLineStyle = wdLineStyleDashDot

Borders.OutsideLineWidth Gibt die Linienstärke des Außenrahmens eines Objekts zurück oder legt diese Stärke fest.

Selection.Borders.OutsideLineWidth = wdLineWidth025pt

Borders.Parent Gibt ein Object zurück, welches das übergeordnete Objekt der angegebenen Borders-Auflistung repräsentiert.

Dim objParent As Object
Set objParent = Selection.Borders.Parent

Borders.Shadow True, wenn der angegebene Rahmen schattiert formatiert ist.

Selection.Borders.Shadow = True

Borders.SurroundFooter True, wenn ein Seitenrahmen die Fußzeile eines Dokuments umfasst.

Selection.Borders.SurroundFooter = True

Borders.SurroundHeader True, wenn ein Seitenrahmen die Kopfzeile eines Dokuments umfasst.

Selection.Borders.SurroundHeader = True