Printing Access Report

[lzook88]

The VBA code to print out an access report is printing the report and the form where the button to print the report is. Below is the code:

Private Sub Command2_Click()
DoCmd.OpenReport "Needed Stock", acViewNormal, , "[PLocation] =" & Chr(34) & Me.Combo0.Column(1) & Chr(34), acDialog
DoCmd.Close acForm, "StockNeeds", acSaveNo
DoCmd.PrintOut
DoCmd.Close acReport, "Needed Stock", acSaveNo
End Sub

I have it set up to:



1.) Open the form and filter results
2.) Close Form where button is
3.) Print out report
4.) Close the report

But I'm getting the report and the form printing out. any suggestions?

Thanks Again
Zook

[June7]

Why close the form?

Specify the report name in the PrintOut object argument.

[lzook88]

The form is a popup from the main navigation asking which unit you want print the report for.

I got it to work. Not sure whats going on with it. But i removed the print out code and left the rest and it opens, prints, closes now.

But I'm curious as to why its printing out with out any coding. Any ideas?

[pbaldy]

It is coded to print. That is what acViewNormal does.

[June7]

Ooops, I should have noticed the acViewNormal. I had assumed you were opening the report to screen view. acViewNormal means direct to default printer. So the report printed then the PrintOut command executed to print the last object that had focus - the form, even though it was closed.