I currently have a multi page user form made up of 2 pages which I would like to print when clicking on a command button on the 1st page of the user form. I have the following code which allows me to print both pages of the user form but on seperate pages.
Private Sub CommandButton1_Click()
Dim curPage As Long
Dim iCtr As Long
curPage = Me.MultiPage1.Value
For iCtr = 0 To Me.MultiPage1.Pages.Count - 1
Me.MultiPage1.Value = iCtr
Me.PrintForm
Next iCtr
Me.MultiPage1.Value = curPage
End Sub
I need to be able to print both pages of the userform on one sheet of paper (printer is set to duplex). Can any one help?
Private Sub CommandButton1_Click()
Dim curPage As Long
Dim iCtr As Long
curPage = Me.MultiPage1.Value
For iCtr = 0 To Me.MultiPage1.Pages.Count - 1
Me.MultiPage1.Value = iCtr
Me.PrintForm
Next iCtr
Me.MultiPage1.Value = curPage
End Sub
I need to be able to print both pages of the userform on one sheet of paper (printer is set to duplex). Can any one help?
