Klasse HTMLDivision (Word VBA)

Die Klasse HTMLDivision stellt ein einzelnes HTML-div-Element in einem Webdokument dar.

Die wichtigste Prozeduren der Klasse HTMLDivision sind Delete und HTMLDivisions.Add

Set

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

Dim htm as HTMLDivision
Set htm = ActiveDocument.Range.HTMLDivisions(Index:=1)

Die folgenden Prozeduren können zum Festlegen der HTMLDivision Klassenvariablen verwendet werden : HTMLDivisionParent, HTMLDivisions.Add, HTMLDivisions.Item, Document.HTMLDivisions, HTMLDivisions, Range.HTMLDivisions und Selection.HTMLDivisions

For Each

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

Dim htm As HTMLDivision
For Each htm In ActiveDocument.Range.HTMLDivisions
	
Next htm

Methoden

Die Hauptmethoden der Klasse HTMLDivision sind

Delete - Löscht den angegebenen HTML-Bereich.

ActiveDocument.Range.HTMLDivisions(1).Delete

HTMLDivisions.Add - Gibt ein HTMLDivision -Objekt zurück, das einen neuen HTML-Abschnitt darstellt, der einem Webdokument hinzugefügt wurde.

Dim htm As HTMLDivision
Set htm = ActiveDocument.Range.HTMLDivisions.Add()

Eigenschaften

Borders Gibt eine Borders -Auflistung zurück, die alle Rahmen für das angegebene Objekt darstellt.

Dim brdsBorders As Borders
Set brdsBorders = ActiveDocument.Range.HTMLDivisions(1).Borders

HTMLDivisions Gibt ein HTMLDIVISIONS -Objekt zurück, das eine HTML-Abteilung in einem Webdokument darstellt.

Dim htmsHTMLDivisions As HTMLDivisions
Set htmsHTMLDivisions = ActiveDocument.Range.HTMLDivisions(1).HTMLDivisions

LeftIndent Gibt einen einzelnen zurück, der den Wert des linken Einzugs (in Punkt) für den angegebenen HTML-Abschnitt darstellt, oder legt diesen fest.

ActiveDocument.Range.HTMLDivisions(1).LeftIndent =

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

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

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.HTMLDivisions(1).Range

RightIndent Gibt den rechten Einzug (in Punkten) für die angegebenen Absätze zurück oder legt ihn fest.

ActiveDocument.Range.HTMLDivisions(1).RightIndent =

SpaceAfter Gibt den Abstand (in Punkt) nach dem angegebenen HTML DIV-Element zurück oder legt diesen fest.

ActiveDocument.Range.HTMLDivisions(1).SpaceAfter =

SpaceBefore Gibt den Abstand (in Punkt) vor dem angegebenen HTML DIV-Element zurück oder legt diesen fest.

ActiveDocument.Range.HTMLDivisions(1).SpaceBefore =

HTMLDivisions.Count Gibt einen Wert vom Typ Long zurück, der die Anzahl der HTML div-Elemente in der Auflistung darstellt.

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

HTMLDivisions.NestingLevel Gibt die Schachtelungsebene der angegebenen HTML DIV-Elemente zurück.

Dim lngNestingLevel As Long
lngNestingLevel = ActiveDocument.Range.HTMLDivisions.NestingLevel

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

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