新浪博客

批量删除Word书签

2017-04-19 10:09阅读：

http://blog.sina.cn/dpool/blog/u/2358236235

如果在Word选项设置中开启了“显示书签”，会发现在复制粘贴时，Word常常会自动生成很多“OLE_LINK”书签，使页面上布满了大大的中括号。对于一个强迫症患者来说，这是不可容忍的。
批量删除Word书签
批量删除Word书签
批量删除Word书签

解决方法是一次批量删除这些OLE书签。在“视图”宏菜单中新建宏，输入以下命令：
Sub 删除OLE书签()
Dim MyBk As Bookmark
For Each MyBk In ActiveDocument.Bookmarks
If UCase(Left(MyBk.Name, 8)) = 'OLE_LINK' Then
MyBk.Delete
End If
Next
End Sub
要删除全部书签，可以用以下宏（来自http://club.excelhome.net/thread-673921-1-1.html>）：
Sub 删除书签()
Dim MyBk As Bookmark
For Each MyBk In ActiveDocument.Bookmarks
MyBk.Delete
Next
End Sub

我的更多文章

下载客户端阅读体验更佳

APP专享