如何使用 VBA 将样式应用于 Word 2010 中的页脚?

如何使用 VBA 将样式应用于 Word 2010 中的页脚?

我在 Word 文档中有一个宏,可以根据书签生成页脚。它能正常工作,但有一个问题除外:页脚中的一个引用字段在更新后字体总是不正确。

大小应该是 6,就像页脚的其余部分一样,但实际上是 9.5,就像原始文本一样。这只发生在一个字段上。我检查了段落符号和整行的格式是否正确。我甚至复制了其中一个功能书签并对其进行了调整,但字体大小总是不对。

多台计算机都出现了该问题。

我已经放弃解决原来的问题了,因为我已经没有什么主意了。我现在想做的是向宏中添加一些代码,以便将某种样式(或字体)应用于页脚。

到目前为止我已经尝试过:

  • 我已经为页脚创建了一个样式(称为 footer1)——在此之前它是未定义的
  • 我已经尝试过 VBA 并在 Google 上搜索了几个小时,但无济于事。
  • 在 Ref-field 中禁用/启用合并字段开关
  • Google 搜索“将样式应用于页脚字 vba”

失败的尝试:

ActiveDocument.Sections(ActiveDocument.Sections.Count) _
        .Footers(1).Range.Style("footer1")

代码如下:

ActiveDocument.Fields.Update
ActiveDocument.Sections(ActiveDocument.Sections.Count) _
        .Footers(1).Range.Fields.Update
' code needed here for changing footer's style to "footer1" 
' Alternative: apply style only to faulty ref field.

感谢您的帮助。

我可以在必要时对 VBA 宏进行细微调整,但我不是专家。我只是没有找到任何可以满足我需求的东西。

答案1

要更改 Word 中特定页脚的字体大小,请使用Range.Font.Si‌​ze

ActiveDocument.Sections(1).Footers(1).Range.Font.Size = 6

语法解释

  • 活动文档:代表活动文档的 Document 对象。访问 Word 文件的其他方式包括文档(索引)或文档(“全名”)

  • .部分(索引):节是 Word 中的一个复杂概念。用户可以将节插入文档,以便更改特定格式区域文档。手动分隔符和分节符将页面划分为单独的部分,每个部分可以具有不同的格式。更改一个页脚属性并不总是意味着所有页脚都会更改。
    点击此处了解更多

    在 VBA 中,当用作的Sections.Count索引参数时.Sections(index),它将始终代表文档的最后一部分

  • .页脚(索引):表示文档中每页顶部、底部或侧边距中的单个页脚区域。其他常用的节属性包括 或 ,border表示给定节内的完整正文headerrange

  • 页脚(索引).范围:表示文档中指定页眉或页脚中包含的部分。请注意Sections(index).range

  • 字体大小:字体可以具有的众多属性之一。页脚的其他常见属性包括Words(index)更改特定单词,Fields或仅Text读取完整的页脚文本

相关内容