Help with print settings controlled by VBA

[Linus_99]

Hi,

Can someone pls help & advise why the following is not working . . .

I'm using Access 2002 but the file in is Access 2000 format.

I'm trying to print a form in landscape format. (Some reports are to be in portrait and some in landscape). The form is a pivot chart.

Sometimes (and I'm not too sure why it happens) the form comes out in landscape, but mostly it comes out in portrait.

Any advice would be appreciated. Thanks
Linus

My code is:
-----------------------------------------------------
Dim prt as Printer
Dim frm as Form

Set prt = Application.Printer

With prt
.PaperSize = acPRPSA4
.Orientation = acPRORLandscape
End With

DoCmd.OpenForm FormName:=strChartName, View:=acViewPreview

Set frm = Forms(strChartName)

frm.Printer = prt

DoCmd.PrintOut

DoCmd.Close

---------------------------------------------------