Bladwijzers uitlezen m.b.v. VBA in Word

Met behulp van VBA kunnen bladwijzers op twee manieren in een document worden uitgelezen. De eerste manier is op naam (volgorde naam) en de tweede manier is op locatie (volgorde document).

Op naam

01Sub readBookmarksByName()
02 
03    Dim i As Integer
04     
05    For i = 1 To ActiveDocument.Bookmarks.Count
06         
07        Debug.Print ActiveDocument.Bookmarks(i)
08         
09    Next i
10 
11End Sub

Op locatie

01Sub readBookmarksByLocation()
02 
03    Dim i As Integer
04     
05    For i = 1 To ActiveDocument.Range.Bookmarks.Count
06         
07        Debug.Print ActiveDocument.Range.Bookmarks(i)
08         
09    Next i
10 
11End Sub

Het onderstaande voorbeeld heeft alleen betrekking op het dialogvenster.

`1`	`ActiveDocument.Bookmarks.DefaultSorting = wdSortByLocation`

`2`	`Dialogs(wdDialogInsertBookmark).Show`