Klasse Section (Word VBA)

Die Klasse Section stellt einen einzelnen Abschnitt in einer Auswahl, einem Bereich oder einem Dokument dar.

Die wichtigste Prozedur der Klasse Section ist Sections.Add

Set

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

Dim sec as Section
Set sec = ActiveDocument.Range.Sections(Index:=1)

Die folgenden Prozeduren können zum Festlegen der Section Klassenvariablen verwendet werden : Sections.Add, Sections.Item, Sections.First, Sections.Last, Document.Sections, Range.Sections und Selection.Sections

For Each

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

Dim sec As Section
For Each sec In ActiveDocument.Range.Sections
	
Next sec

Methoden

Dies ist die Hauptmethode der Klasse Section

Sections.Add - Gibt ein section -Objekt zurück, das einen neuen Abschnitt darstellt, der einem Dokument hinzugefügt wurde.

Dim sec As Section
Set sec = ActiveDocument.Range.Sections.Add()

Eigenschaften

Borders Gibt eine Borders -Auflistung zurück, die alle Rahmen im Abschnitt darstellt.

ActiveDocument.Range.Sections(1).Borders =

Footers Gibt eine HeadersFooters -Auflistung zurück, die die Fußzeilen im angegebenen Abschnitt darstellt.

Dim hfsFooters As HeadersFooters
Set hfsFooters = ActiveDocument.Range.Sections(1).Footers

Headers Gibt eine HeadersFooters -Auflistung zurück, die die Kopfzeilen für den angegebenen Abschnitt darstellt.

Dim hfsHeaders As HeadersFooters
Set hfsHeaders = ActiveDocument.Range.Sections(1).Headers

Index Gibt einen Wert vom Typ Long zurück, der die Position eines Elements in einer Auflistung darstellt.

Dim lngIndex As Long
lngIndex = ActiveDocument.Range.Sections(1).Index

PageSetup Gibt ein PageSetup -Objekt zurück, das dem angegebenen Abschnitt zugeordnet ist.

ActiveDocument.Range.Sections(1).PageSetup =

Parent Gibt einen Wert vom Typ Object zurück, der das übergeordnete Objekt des angegebenen Section-Objekts darstellt.

Dim objParent As Object
Set objParent = ActiveDocument.Range.Sections(1).Parent

ProtectedForForms True, wenn der angegebene Abschnitt für Formulare geschützt ist.

ActiveDocument.Range.Sections(1).ProtectedForForms = True

Range Gibt ein Range -Objekt zurück, das den Teil eines Dokuments darstellt, der im angegebenen Objekt enthalten ist.

Dim rngRange As Range
Set rngRange = ActiveDocument.Range.Sections(1).Range

Sections.Count Gibt einen Wert vom Typ Long zurück, der die Anzahl der Abschnitte in der Auflistung darstellt.

Dim lngCount As Long
lngCount = ActiveDocument.Range.Sections.Count

Sections.First Gibt ein section -Objekt zurück, das das erste Element in der Sections-Auflistung darstellt.

Dim secFirst As Section
Set secFirst = ActiveDocument.Range.Sections.First

Sections.Last Gibt das letzte Element in der Sections-Auflistung als ein Section-Objekt zurück.

Dim secLast As Section
Set secLast = ActiveDocument.Range.Sections.Last

Sections.PageSetup Gibt ein PageSetup -Objekt zurück, das dem angegebenen Dokument, Bereich, Abschnitt, Abschnitten oder Auswahl zugeordnet ist.

ActiveDocument.Range.Sections.PageSetup =

Sections.Parent Gibt einen Wert vom Typ Object zurück, der das übergeordnete Objekt des angegebenen Sections-Objekts darstellt.

Dim objParent As Object
Set objParent = ActiveDocument.Range.Sections.Parent