Word 使用值 999999 来指示当前选择包含多个相应的格式。
在您的示例中,超链接表示为包含突出显示的运行的 Word 字段(按 Alt-F9 切换代码视图)。重新打开文档后,该字段本身没有应用突出显示。这不一定是 Word 中的错误,只是(超链接)字段的行为不记得字段级别的格式。
但是,您的实际任务似乎是从文档中删除突出显示的文本。这通常可以使用Range.Find
Word 的对象更好地完成:
range.Find.ClearFormatting();
range.Find.ClearAllFuzzyOptions();
range.Find.Highlight = 1;
range.Find.Replacement.ClearFormatting();
range.Find.Replacement.Text = "";
range.Find.Wrap = Word.WdFindWrap.wdFindContinue;
range.Find.Execute(Replace: Word.WdReplace.wdReplaceAll);
这是一个完整的示例程序,您可以使用它来删除突出显示:
using System;
using System.Linq;
using Word = Microsoft.Office.Interop.Word;
class Program
{
static void Main(string[] args)
{
var fileName = args[0];
var wordApp = new Word.Application();
wordApp.Visible = true;
var document = wordApp.Documents.Open(fileName);
RemoveHighlightingEverywhere(document);
}
static void RemoveHighlightingEverywhere(Word.Document document)
{
foreach (Word.Range storyRange in document.StoryRanges)
{
var range = storyRange;
while (range != null)
{
RemoveHighlightingFromRange(range);
if (range.ShapeRange.Count > 0)
{
foreach (Word.Shape shape in range.ShapeRange)
{
if (shape.TextFrame.HasText != 0)
{
RemoveHighlightingFromRange(
shape.TextFrame.TextRange);
}
}
}
range = range.NextStoryRange;
}
}
}
static void RemoveHighlightingFromRange(Word.Range range)
{
range.Find.ClearFormatting();
range.Find.ClearAllFuzzyOptions();
range.Find.Highlight = 1;
range.Find.Replacement.ClearFormatting();
range.Find.Replacement.Text = "";
range.Find.Wrap = Word.WdFindWrap.wdFindContinue;
range.Find.Execute(Replace: Word.WdReplace.wdReplaceAll);
}
}