プロが教える店舗&オフィスのセキュリティ対策術

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

A 回答 (3件)

一応、次の要領で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

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

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

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

    • good
    • 0

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

    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています


このQ&Aを見た人がよく見るQ&A