アプリ版:「スタンプのみでお礼する」機能のリリースについて

お世話になってます。
すみませんAccesssVBAの初心者です。

レポートを作成してフォームからボタンを押下されたタイミングでレポート出力するという機能を作成してるのですが、

レポートがサイズの関係でどうしても2つに分割しなくてはいけず、
2つのレポートをフォーム上からボタンクリック時、同時に印刷出来て
ページ番号も連番でふるということは可能でしょうか?
たとえば、
レポートAが6ページ
レポートBが4ページあったとしたら
出力する際、レポートAを1~6ページで出力、続いてレポートBを7~10ページでページをふって印刷・・・
というような感じです。。

何か参考になるURL等あれば教えてください。
よろしくお願い致します。

A 回答 (2件)

Private Sub コマンド0_Click()


On Error Resume Next
  DoCmd.OpenReport "住所録", acPreview, , , , 3
End Sub

レポートのページを表示しているコントロールソースを以下のように!

=[Page]+[OpenArgs] & "/" & [Pages]+[OpenArgs] & " ページ"

ただし、この場合、4ページと表示されます。
    • good
    • 0

老婆心ながら・・・



=[Page] & "/" & [Pages]+4 & " ページ"

1/10
2/10
・・・
6/10

=[Page]+5 & "/" & [Pages]+6 & " ページ"

7/10
8/10
9/10
10/10

と、実際は、応用する必要があります。

=[Page]+[OpenArgs] & "/" & [Pages]+[OpenArgs]+1 & " ページ"

というように・・・。
    • good
    • 0
この回答へのお礼

お礼が遅くなり大変申し訳ありませんでした。
ご丁寧に何度も親切に回答感謝いたします。
レポート難しかったですが、なんとか出来ました!
ありがとうございました。

お礼日時:2008/01/18 11:55

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

関連するカテゴリからQ&Aを探す