我在 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.Size
ActiveDocument.Sections(1).Footers(1).Range.Font.Size = 6
语法解释
活动文档:代表活动文档的 Document 对象。访问 Word 文件的其他方式包括文档(索引)或文档(“全名”)
.部分(索引):节是 Word 中的一个复杂概念。用户可以将节插入文档,以便更改特定格式区域文档。手动分隔符和分节符将页面划分为单独的部分,每个部分可以具有不同的格式。更改一个页脚属性并不总是意味着所有页脚都会更改。
点击此处了解更多。在 VBA 中,当用作的
Sections.Count
索引参数时.Sections(index)
,它将始终代表文档的最后一部分.页脚(索引):表示文档中每页顶部、底部或侧边距中的单个页脚区域。其他常用的节属性包括 或 ,
border
表示给定节内的完整正文header
range
页脚(索引).范围:表示文档中指定页眉或页脚中包含的部分。请注意
Sections(index).range
字体大小:字体可以具有的众多属性之一。页脚的其他常见属性包括
Words(index)
更改特定单词,Fields
或仅Text
读取完整的页脚文本