Page Setup For Printing VBA Form

[pistonbroke]

I want to print a VBA form as it appears on the screen, "formname.PrintForm" works fine, except i need to temporarily force a LANDSCAPE orientation (others will print the form, and they generally have PORTRAIT as the printer default layout).

Is there something similar to this activesheet setup, that will work to print a VBA form ? This code doesn't seem to affect the PrintForm command.

With ActiveSheet.PageSetup
.Orientation = xlLandscape
End With

Thanks, Kevin

 

[Diablo II]

Orientation 1 = Portrait
Orientation 2 = Landscape

 

[pistonbroke]

Diablo - thanks. How do i force that line in the code of my "Print Form" button?

Private Sub cbPrint_Form_Click()
fm_Select_Find_Criteria.PrintForm
End Sub


Thanks again, Kevin

 

[Diablo II]

Worksheets("Sheet1").PageSetup.Orientation = xlLandscape

 

[pistonbroke]

Diablo, thanks, but that doesn't work to change the print layout for the VBA Form itself (which is what i am printing), since i'm not actually printing a worksheet.

The actual VBA form doen't appear to have properties relating to print orientation, paper size etc. So i was hoping to be able to temporarily set the default printer orientation in code instead ?

Thanks, Kevin

 

[Diablo II]

are you doing a userform or a worksheets form?