具有多个字段的 Word 互操作页眉和页脚

Question

我正在尝试研究如何更新\更改模板上的字段。到目前为止，我发现的每条好消息都导致当前页眉或页脚被完全覆盖。这很明显。问题是我找不到如何专门修改页脚中的某些字段而不是整个页脚。

        // Set headers
        foreach (Word.Section section in doc.Sections)
        {
            Word.Range headerRange = section.Headers[Word.WdHeaderFooterIndex.wdHeaderFooterPrimary].Range;
            headerRange.Fields.Add(headerRange, Word.WdFieldType.wdFieldPage);
            headerRange.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphRight;
        }

        // Set footers
        foreach (Word.Section wordSection in doc.Sections)
        {
            Word.Range footerRange = wordSection.Footers[Word.WdHeaderFooterIndex.wdHeaderFooterPrimary].Range;
            footerRange.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphCenter;
            footerRange.Font.ColorIndex = Word.WdColorIndex.wdDarkRed;
            footerRange.Font.Size = 20;
            footerRange.Text = "Confidential";
        }

在这段代码中，我试图让“机密”一词覆盖中间字段。目前中间字段为空白。左右字段分别是页码和日期。一旦我运行代码，它就会被“机密”代码替换。它还完全删除了作为页脚背景颜色强调的形状。

制表位在 3.25 英寸和 6.5 英寸处

如何修改现有字段？这样会删除形状吗？

更新： 以下代码是在我觉得自己在兜圈子之前得到的。这一切看起来都非常有序，就好像您在物理上键入\编辑文档一样。伊克。不管怎样，这很接近。但是由于某种原因，格式被忽略了，我不能让它只应用于中心文本。另外，如果我取消注释日期字段行，整个页脚都会被删除。

        // Set footers
        foreach (Word.Section wordSection in doc.Sections)
        {
            Word.Range footerRange = wordSection.Footers[Word.WdHeaderFooterIndex.wdHeaderFooterPrimary].Range;
            footerRange.Collapse(Word.WdCollapseDirection.wdCollapseEnd);
            footerRange.Paragraphs.TabStops.Add(wordApp.InchesToPoints(3.25F), Word.WdTabAlignment.wdAlignTabCenter);
            footerRange.Paragraphs.TabStops.Add(wordApp.InchesToPoints(6.5F), Word.WdTabAlignment.wdAlignTabRight);

            footerRange.Fields.Add(footerRange, Word.WdFieldType.wdFieldPage, "\t", true);
            footerRange.Font.ColorIndex = Word.WdColorIndex.wdDarkRed;
            footerRange.Font.Size = 20;
            footerRange.Text = "\tCONFIDENTIAL\t";
            footerRange.InsertBefore("01-DEC-18");
            //footerRange.Fields.Add(footerRange, Word.WdFieldType.wdFieldDate);
        }

Answer 1

以下内容用指定格式替换“机密”以替换文档中每个主要页脚范围的第二部分中当前的内容。 （“第二部分”是指第一个和第二个制表位之间的内容）。

关键是找到两个制表位的Range 位置，并将内容的目标Range 设置在第一个制表位之后的一个字符和第二个制表位之前的一个字符处。

Word.Range ftr = null;
Word.Paragraph para = null;
Word.Range paraRng = null;
Word.Range tStop1 = null;
Word.Range tStop2 = null;
int nrTabs;

foreach (Word.Section sec in doc.Sections)
        {
    ftr = sec.Footers[Word.WdHeaderFooterIndex.wdHeaderFooterPrimary].Range;
    para = ftr.Paragraphs[1];
    nrTabs = para.TabStops.Count;
    if (nrTabs == 2)
    {
        paraRng = para.Range;
        tStop1 = paraRng.Duplicate;
        tStop1.Find.Execute("^t", missing, missing, missing, missing, missing,
            missing, missing, Word.WdFindWrap.wdFindStop);
        tStop1.MoveStart(Word.WdUnits.wdCharacter, 1); //put it after the tab character
        tStop2 = tStop1.Duplicate;
        tStop2.Find.Execute("^t", missing, missing, missing, missing, missing,
            missing, missing, Word.WdFindWrap.wdFindStop);
        tStop2.MoveEnd(Word.WdUnits.wdCharacter, -1); //put it before the tab character
        tStop1.End = tStop2.End;
        tStop1.Text = "Confidential";
        tStop1.Font.ColorIndex = Word.WdColorIndex.wdDarkRed;
        tStop1.Font.Size = 20f;
    }
}

Answer 2

我只是继续手动操作以获得最佳结果。

        string tab = "\t";
        string note = "Confidential";
        string dt = DateTime.Today.Date.ToString("d");
        int pg = 0;
        // Set footers
        foreach (Word.Section wordSection in doc.Sections)
        {
            pg += 1;
            Word.Range footerRange = wordSection.Footers[Word.WdHeaderFooterIndex.wdHeaderFooterPrimary].Range;
            footerRange.Collapse(Word.WdCollapseDirection.wdCollapseEnd);
            footerRange.Paragraphs.TabStops.Add(wordApp.InchesToPoints(3.25F), Word.WdTabAlignment.wdAlignTabCenter);
            footerRange.Paragraphs.TabStops.Add(wordApp.InchesToPoints(6.5F), Word.WdTabAlignment.wdAlignTabRight);
            string footerString = $"pg. {pg.ToString()}{tab}{note}{tab}{dt}";
            footerRange.Text = footerString;
        }