使用VBA代码/宏更改word文档中的页脚

Question

如何使用VBA更改word文档中的页脚信息？

加载文档后，VBA代码将从数据库中获取必要的信息，我想将该信息附加到页脚。

我从DB中获取信息，但将其附加到页脚是另一回事。

赞赏任何简单的相关示例。

Answer 1

这将在每个页面上创建页眉和页脚。

With ActiveDocument.Sections(1)
    .Headers(wdHeaderFooterPrimary).Range.Text = "Header goes here"
    .Footers(wdHeaderFooterPrimary).Range.Text = "Footer goes here"
End With

您可以在此处找到有关如何在vba中使用页眉和页脚的更多信息：http://msdn.microsoft.com/en-us/library/office/aa221968%28v=office.11%29.aspx