Printing each page from a multipage object

[JimFl78]

Hi,

I have been trying to find out if it is possible to print out each page of a scrollable multipage element.

I am looking to iterate through a loop and send a print command for each pages.

Dim pPage As Page, i
i = 0
For Each pPage In Me.MultiPage1.Pages
'this doesnt work.
pPage.printForm
Next pPage


Can anybody tell me if this is possible?

[Jan Karel Pieterse]

Yes, like this:


Dim lCt As Long
For lCt = 1 To MultiPage1.Pages.Count
MultiPage1.Value = lCt - 1
Me.PrintForm
Next

[JimFl78]

Thats great as it loops through each of the pages. However it only prints part of the scrollable form. Is there a way to print the entire page?

[Jan Karel Pieterse]

I have no idea, sorry.

[otto]

have you tried printing an entire sheet with the macro recorder turned on. It should give you the required code.