Report.PrintFooter

Returns/sets the document footer used when printing.

Syntax Parameters Return/assignment value 
Property Report.PrintFooter( _
    placement As PrintFooterPlacement) As String
 placement [in]

Which area of the paper the footer should appear on.

Type: PrintFooterPlacement

String

Remarks: The following keywords can be used in a printer header/footer string:

  • &[Page]: The current page number.
  • &[Pages]: The total number of pages.
  • &[Document Name]: The document name.
  • &[Date]: The date when the report was printed.
  • &[Time]: The time when the report was printed.

SVB Example

Adding print headers and footers: 

Option Explicit
Option Base 1
Sub Main

    'This will add a centered printer header saying
    '"CONFIDENTIAL: For Dayton office use only" into the report.
    'When you print the report, this header will appear on every page.
    ActiveReport.PrintHeader(scPrintFooterCenter) = _
        "CONFIDENTIAL: For Dayton office use only"

    'This will add a printer footer with the date, current page,
    'and total pages on every page.
    'An interesting note here is that you can use the same
    'header/footer syntax here that you can interactively.
    'For example, the syntax "&[Page]" will display the current page number in the footer.
    ActiveReport.PrintFooter(scPrintFooterLeft) = _
        "&[Date]"
    ActiveReport.PrintFooter(scPrintFooterCenter) = _
        "Page &[Page] of &[Pages]"

End Sub