ACCESSのＶＢＡでプリンタを指定したい

ACCESSでレポートを２つ作成し、フォームのボタンでレポートの印刷を行っています。
押されたボタンで、印刷するレポートが違うのですが、その時に、プリンタを指定したいのです。

Private Sub レポート印刷_Click()
Dim stDocName As String
stDocName = "レポート印刷"
DoCmd.OpenReport stDocName, acNormal
End Sub

上記のような感じで作っているのですが、それぞれのレポートで印刷するプリンタが違います。
どのようにしたらいいでしょうか？

No.1 ベストアンサー 回答者： snoopy64 回答日時： 2004/03/18 15:17

そのレポートをデザインビューで開き、「ファイル→ページ設定→ページ」の「印刷」で「その他のプリンタ」を選び、印刷させたいプリンタを指定すればいけます。

頑張ってくださいヽ(^。^)ノ

この回答へのお礼

無事できました。
ありがとうございます。
VBAで指定することばかり考えていて、レポートのページ設定で出来るなんて知りませんでした。
本当にありがとうございました。

お礼日時：2004/03/18 15:27