Word中的书签功能可快速、准确定位文档中特定的位置,经常用于模板定制、文档产出等。

可一直以来,书签功能存在一个不便的操作,即无法批量删除,只能单个删除,操作极不友好。

解决方案

我用代码暂时还改变不了世界,但可以提高工作效率。使用两VBA代码,即可完成遍历、删除。

ALT+F11,打开VBA编辑器,在ThisDocument页面写下语句,F5执行即可。

Sub DelBookmarks()

Dim MyBk As Bookmark

For Each MyBk In ActiveDocument.Bookmarks

MyBk.Delete

Next

End Sub