ACCESSレポートの１ページだけ

質問

ACCESSのレポートの1ページ目だけ
を印刷する事をVBAで行うためには、
どうしたら良いのですか？
2ページ目以降は不要な時もあり、そのたび
印刷設定で1ページを指定する作業を簡略したいのです。
よろしくお願いいたします。

回答No.2

noname#140971 · ベストアンサー

一応、次の要領でOKですが、なにぶん、今テストしたばかりですので・・・。

<Form>
Private Sub コマンド0_Click()
On Error Resume Next
　　DoCmd.OpenReport "customer", acPreview, , , , 1
End Sub

<Report>
Private Sub Report_Page()
　　If CBool(Me.Page > Me.OpenArgs) Then
　　　　SendKeys "%({F4})", False
　　End If
End Sub

一応、コメントアウトすれば５頁。生かせば１頁。

OpenArgs　が使えるバージョンであることが前提ですが・・・。

回答No.3

CHRONOS_0

普通は印刷したいデータだけになるような抽出条件を設定しますね

回答No.1

ooxx

印刷のページ設定オプションで指定すれば、次回から指定したものになるはずですが。