Using variables in footer(s)

[BBS]

We have a document management program that runs and gives us a "strText"
variable for our documents. With this variable, I need a macro that would
allow me to accomplish a few things:

For EVERY footer in my document (whether Diff First Pg or not), I need to
insert strText in 8pt font. The problem is that 1) I want the users to be
able to choose whether they want strText printed on the first page, the last
page, or every page 2) there is sometimes other text in the footer and
whenever I try to create a macro it uses RANGE and replaces all existing
text. For instance, if I already have page numbering applied, it removes it.
I want strText to go at the end of the footer, 1 paragraph below the last
line. 3) I need to check to see if strText exists first, so that it could be
deleted before the new strText is inserted (bookmark maybe)

I hope I explained this well enough

 

[Jezebel]

The simple approach to this is to use a DocProperty field. All your macro
needs to do is to set the value of the property --

ActiveDocument.CustomerDocumentProperties("OurText") = strText

Then update fields in the footer.