Share via

FooterCenter Property [Visio 2003 SDK Documentation]

  • Article

Gets or sets the text string that appears in the center portion of a document's footer.

strRet = object**.FooterCenter**

object**.FooterCenter** = stringExpression

strRet     String. The text in the center portion of the footer.

object     Required. An expression that returns a Document object.

stringExpression     Required String. New text for the center portion of the footer.

Version added

2002

Remarks

You can also set this value in the Center box under Footer in the Header and Footer dialog box (View menu).

Both strRet and strExpression can contain escape codes that represent data. These escape codes can be concatenated with other text. For a list of valid escape codes you can use with the FooterCenter property, see the FooterLeft property.

Example

The following macro shows how to place a string containing the current page number and total number of pages into the center portion of a document's footer. After you run this macro on a one-page document, the center portion of the footer contains "Page 1 of 1".

Sub FooterCenter_Example() 

    Dim strFooter as String

    'Build the footer string. 
    strFooter = "Page &p of &P" 

    'Set the footer of the current document. 
     ThisDocument.FooterCenter = strFooter
 
End Sub

Applies to | Document object

See Also | FooterLeft property | FooterMargin property | FooterRight property | HeaderCenter property | HeaderFooterColor property | HeaderFooterFont property | HeaderLeft property | HeaderMargin property | HeaderRight property