word显示书签并给书签添加颜色

KillFuckBugs

已于 2023-07-27 11:21:33 修改

阅读量1.4k

点赞数 1

文章标签： word

于 2023-07-27 11:17:59 首次发布

本文链接：https://blog.csdn.net/nbspzs/article/details/131956252

版权

文章介绍了如何使用VBA宏来批量改变Word文档中所有书签内文本的颜色，提供了一个简单的宏代码示例，该宏将书签文本颜色设置为红色，并指导用户如何运行和应用宏。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

CTR+g 定位书签

在 Word 的用户界面中，没有直接的选项可以批量为所有书签设置颜色。但你可以使用 VBA 宏或者编写自定义的功能来实现这个需求。

这里给出一个简单的 VBA 宏，它可以设置当前文档中所有书签内文本的颜色：

```vba
Sub ColorAllBookmarks()
    Dim doc As Document
    Set doc = ActiveDocument
    Dim bkm As Bookmark

    For Each bkm In doc.Bookmarks
        bkm.Range.Font.Color = wdColorRed
    Next bkm
End Sub
```

这个宏将遍历当前文档的所有书签，并将每个书签内文本的颜色设置为红色。

要运行这个宏，你需要先打开 VBA 编辑器（按下 Alt + F11），然后在 "插入"（Insert） 菜单中选择 "模块"（Module），在新建的模块中复制并粘贴上面的代码。然后，你可以按下 F5 或者在 "运行"（Run） 菜单中选择 "运行子/用户窗体"（Run Sub/UserForm） 来运行这个宏。