Solved

Print only one page of an ACCESS 2003 report

Posted on 2013-02-04
3
596 Views
Last Modified: 2013-02-04
How do I print just the first page of an ACCESS 2003 report in VBA?

Sandra
0
Comment
Question by:ssmith94015
3 Comments
 
LVL 30

Expert Comment

by:IanTh
ID: 38851814
0
 
LVL 28

Accepted Solution

by:
omgang earned 500 total points
ID: 38851816
Public Sub PrintReport()
On Error GoTo Err_PrintReport

    DoCmd.OpenReport "MyReport", acViewPreview
        'print the report - specify page from and page to
    DoCmd.PrintOut acPages, 1, 1

Exit_PrintReport:
    Exit Sub

Err_PrintReport:
    MsgBox Err.Number & " (" & Err.Description & ") in procedure PrintReport of Module Module9"
    Resume Exit_PrintReport

End Sub


OM Gang
0
 

Author Closing Comment

by:ssmith94015
ID: 38852565
Thank you, this worked perfectly.
0

Featured Post

Salesforce Made Easy to Use

On-screen guidance at the moment of need enables you & your employees to focus on the core, you can now boost your adoption rates swiftly and simply with one easy tool.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Describes a method of obtaining an object variable to an already running instance of Microsoft Access so that it can be controlled via automation.
It’s the first day of March, the weather is starting to warm up and the excitement of the upcoming St. Patrick’s Day holiday can be felt throughout the world.
With Microsoft Access, learn how to start a database in different ways and produce different start-up actions allowing you to use a single database to perform multiple tasks. Specify a start-up form through options: Specify an Autoexec macro: Us…
The view will learn how to download and install SIMTOOLS and FORMLIST into Excel, how to use SIMTOOLS to generate a Monte Carlo simulation of 30 sales calls, and how to calculate the conditional probability based on the results of the Monte Carlo …

821 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question