如何隐藏Word文档中某一颜色的所有高亮标记？

你现有的VBA代码是直接删除黄色高亮（将颜色设为wdAuto），如果要仅隐藏黄色高亮（视觉上看不到，但保留高亮标记以便后续恢复），可以按以下方式修改代码：

Sub HideYellowHighlight()
    Dim r As Range
    Set r = ActiveDocument.Range

    With r.Find
        .Highlight = True
        Do While .Execute(FindText:="", Forward:=True) = True
            If r.HighlightColorIndex = wdYellow Then
                ' 将黄色高亮设为文档背景色，实现视觉隐藏
                r.HighlightColor = ActiveDocument.Background.Fill.ForeColor.RGB
                r.Collapse wdCollapseEnd ' 等同于原代码的r.Collapse 0
            End If
        Loop
    End With
End Sub

代码说明 #

• 遍历文档内所有带高亮的内容，精准筛选出黄色高亮的文本
• 将黄色高亮的颜色替换为文档背景色，视觉上与背景融合，达到隐藏效果
• 保留高亮属性，后续只需将颜色改回wdYellow即可恢复原黄色高亮

内容的提问来源于stack exchange，提问作者Rik