Data Report:Orientation

[blackdevil1979]

Hi,

I want to adjust my data report to be landscape type of Orientation. But the problem is most code that i found is as below:

With myRpt

.Hide
.Orientation = rptOrientLandscape
.refresh
.show

End With

However, when i tried it, it keep coming out the same error message variable not defined and pointed to --> rptOrientLandscape.

Can someone help me? Thanks

[RobDog888]

Try this...

Option Explicit
'Add reference to Crystal Reports xx.x ActiveX Designer Run Time  Library
Private Sub Form_Load()
    
    Dim oApp As CRAXDRT.Application
    Dim oReport As CRAXDRT.Report
    
    Set oApp = New CRAXDRT.Application
    Set oReport = oApp.OpenReport(App.Path & "\Test.rpt")
    oReport.PaperOrientation = crLandscape
    oReport.PrintOut True
    
End Sub