Change the footer in a word document with VBA code / Macro

vba footer word-2010
Mana picture Mana · Nov 30, 2012 · Viewed 21.6k times · Source

How can I change the footer information in a word document with VBA?

When the document is loaded, the VBA code will get the necessary info from a database, and I want to attach that info to the footer.

I got the fetching the info from the DB down, but attaching it to the footer is another story.

Any simple related examples are appreciated.

Answer

Zaider picture Zaider · Nov 30, 2012

This will create a header and footer on every page.

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

You can find more information on how to use headers and footers with vba here: http://msdn.microsoft.com/en-us/library/office/aa221968%28v=office.11%29.aspx

Related questions

Is there a way to crack the password on an Excel VBA Project?

I've been asked to update some Excel 2003 macros, but the VBA projects are password protected, and it seems there's a lack of documentation... no-one knows the passwords. Is there a way of removing or cracking the password on a VBA …

Read More
How do I declare a global variable in VBA?

I wrote the following code: Function find_results_idle() Public iRaw As Integer Public iColumn As Integer iRaw = 1 iColumn = 1 And I get the error message: "invalid attribute in Sub or Function" Do you know what I did wrong? I tried …

Read More
How to use Regular Expressions (Regex) in Microsoft Excel both in-cell and loops

How can I use regular expressions in Excel and take advantage of Excel's powerful grid-like setup for data manipulation? In-cell function to return a matched pattern or replaced value in a string. Sub to loop through a column of data …

Read More