word中批量删除书签VBA方法

附录：Sub test()Dim MyBk As BookmarkFor Each MyBk In ActiveDocument.Bookmarks MyBk.DeleteNextEnd Sub