CenterFooter Property
Returns or sets the center part of the footer. Read/write String.
Remarks
Special format codes can be used in the footer text.
Example
This example prints the workbook name and page number at the bottom of each page.
Worksheets("Sheet1").PageSetup.CenterFooter = "&F page &P"