Range.BookmarkID (Word)

Gibt die Nummer der Textmarke zurück, die den Anfang des angegebenen Bereichs einschließt. gibt 0 (null) zurück, wenn kein entsprechendes Lesezeichen vorhanden ist.

Die Nummer der Textmarke entspricht der Position der Textmarke im Dokument: 1 steht für die erste Textmarke, 2 steht für die zweite usw.

Set myRange = ActiveDocument.Content 
myRange.Collapse Direction:=wdCollapseStart 
If myRange.BookmarkID = 0 Then 
 ActiveDocument.Bookmarks.Add Name:="temp", Range:=myRange 
End If