按位置在vba中对单词书签进行排序

Question

我试图按字词文档的位置循环显示书签。

是的我见过这个：How to get list of all bookmark-elements from a Word document to an array in order by location: VBA / Word

不，它不起作用。而对于我的生活，我不知道为什么这不会，因为它是从MS支持页面解除的。

Sub cycleBookmarks()
 ActiveDocument.Bookmarks.DefaultSorting = wdSortByLocation
 Dim bkm As Bookmark
  For Each bkm In ActiveDocument.Bookmarks
  Next bkm
End Sub

有人知道如何通过文档位置正确循环书签吗？我不关心页眉和页脚（虽然完整的答案会很好）

Answer 1

根据this MSDN site DefaultSorting property：

  

返回或设置显示在书签名称中的排序选项   书签对话框（插入菜单）。读/写WdBookmarkSortBy。

因此，您需要使用您在问题中提供的链接中的@Mana解决方案。