Klasse Editor (Word VBA)

Die Klasse Editor stellt einen einzelnen Benutzer dar, der über spezifische Berechtigungen verfügt, um Teile eines Dokuments zu bearbeiten.

Die wichtigste Prozeduren der Klasse Editor sind Delete und Editors.Add

Set

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

Dim edt as Editor
Set edt = ActiveDocument.Range.Editors(Index:=1)

Die folgenden Prozeduren können zum Festlegen der Editor Klassenvariablen verwendet werden : Editors.Add, Editors.Item, Range.Editors und Selection.Editors

For Each

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

Dim edt As Editor
For Each edt In ActiveDocument.Range.Editors
	
Next edt

Methoden

Die Hauptmethoden der Klasse Editor sind

Delete - Löscht das angegebene Editor- Objekt.

ActiveDocument.Range.Editors(1).Delete

Editors.Add - Gibt ein Editor- Objekt zurück, das eine neue Berechtigung für einen angegebenen Benutzer darstellt, um einen Bereich oder eine Auswahl in einem Dokument zu ändern.

Dim strEditorID As String: strEditorID =  
Dim edt As Editor
Set edt = ActiveDocument.Range.Editors.Add(EditorID:=strEditorID)

Eigenschaften

ID Gibt die identifizierende Bezeichnung für das angegebene Objekt zurück oder legt Sie fest, wenn das übergeordnete Dokument als Webseite gespeichert wird.

Dim strID As String
strID = ActiveDocument.Range.Editors(1).ID

Name Gibt den Namen des angegebenen Objekts zurück oder legt ihn fest.

Dim strName As String
strName = ActiveDocument.Range.Editors(1).Name

NextRange Gibt ein Range -Objekt zurück, das den nächsten Bereich darstellt, für den ein Benutzer über Berechtigungen zum Ändern verfügt.

Dim rngNextRange As Range
Set rngNextRange = ActiveDocument.Range.Editors(1).NextRange

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

Dim objParent As Object
Set objParent = ActiveDocument.Range.Editors(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.Editors(1).Range

Editors.Count Gibt den Wert vom Typ Long zurück, der die Anzahl der Editor-Objekte in der Auflistung darstellt.

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

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

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