Klasse Editor (Word VBA)

Die Klasse Editor stellt einen einzelnen Benutzer dar, der über spezifische Berechtigungen verfügt, um Teile eines Dokuments zu bearbeiten. Um eine Editor -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

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

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

Delete

Löscht das angegebene Editor- Objekt.

ActiveDocument.Range.Editors(1).Delete

DeleteAll

Löscht alle Bearbeitungsberechtigungen in einem Dokument für einen bestimmten Benutzer.

Dim objEditor As Editor 
 
Set objEditor = Selection.Editors(1) 
 
objEditor.DeleteAll

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.

Sie können auch die GoToEditableRange -Methode des Range -Objekts verwenden, um den nächsten Bereich zurückzugeben, für den ein Benutzer über die Berechtigung zum Ändern verfügt.

Dim objEditor As Editor 
Dim objRange As Range 
 
Set objEditor = Selection.Editors(1) 
Set objRange = objEditor.NextRange

Range

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

Informationen zum Zurückgeben eines Bereichs aus einem Dokument oder Zurückgeben eines Formbereichs aus einer Auflistung von Formen finden Sie unter der Range -Methode.

ActiveDocument.Paragraphs(1).Range.Style = wdStyleHeading1

SelectAll

Wählt alle Formen in einem Dokument aus, die von einem Benutzer eingefügt oder bearbeitet wurden.

Mit dieser Methode werden keine InlineShape-Objekte markiert.

ActiveDocument.Range.Editors(1).SelectAll