i may have some code that would help...
Private Sub ViewReport(ReportName As String, WhereStr As Variant)
On Error GoTo Err_ViewReport
If IsNull(WhereStr) Then
WhereStr = ""
End If
DoCmd.OpenReport ReportName, acPreview, , WhereStr
Exit_ViewReport:
Exit Sub...
Thanks for replying. I'm actually looking for code to set on openreport that will open the report to 11x17. The reason is when others open the database on their computer the report opens in the default portrait 8 1/2 x 11. There will be several users and I wanted the report size to be hard-coded...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.