Excel VBA を学ぶなら moug モーグ｜Access （一般機能）｜レポートで1枚の用紙に複数の伝票を印刷したい

Q＆A掲示板の使い方 Excel （一般機能） Excel （VBA） Access （一般機能） Access （VBA） Word （一般機能） Word （VBA） PowerPoint （一般・VBA） Outlook （全般） Windows （全般）プログラミングセキュリティ WEBページ制作グラフィックデータベース経理スマートフォン
Excel 一般機能テクニック Excel VBA テクニック Word一般機能テクニック Access 一般機能テクニック Access VBA テクニック
Excel 基礎 Word 基礎 Excel 関数仕事に役立つ Excel 関数 Excel で描くオートシェイプ画ほっとひといき給湯室
VBAエキスパートとはマクロガール☆マコと学ぼう Excel VBA ビギナーズ VBAセミナー情報 VBA書籍
書籍プレゼントメルマガ「オフパー」おすすめ書籍おすすめサイトフリーソフト mougブログ

Access （一般機能）

Accessの一般機能に関するフォーラムです。

掲示板への投稿には会員登録（無料）が必要です。会員登録がまだの方はこちら
「掲示板ご利用上のお願い」に反するご記入はご遠慮ください。
Q&A掲示板の使い方はこちらをご覧ください

	(Windows 10 Home : Access 2003) レポートで1枚の用紙に複数の伝票を印刷したい投稿日時: 20/09/25 15:59:59 投稿者: ナランヤサ
よくある伝票を作成しましたただA4用紙だと上3分の1ぐらいに収まるので異なる伝票をA4用紙に3つ程入れて印刷したいです。何かいい方法があればご教示の程お願いいたします。

	投稿日時: 20/09/25 21:05:46 投稿者: hatena
「よくある伝票」と言われてもいろいろありますので、もう少し具体的に説明してもらえますか。 1レコード1枚の領収書とか、ヘッダー部分と詳細部分のある請求書とか、詳細がある場合は、詳細の行数とか、一つの伝票で複数ページになることがあるのかないのかとか、なるべつ詳細に説明してください。それぞれで作り方が異なってきますので。

投稿日時: 20/09/25 21:05:46

投稿者: hatena

「よくある伝票」と言われてもいろいろありますので、もう少し具体的に説明してもらえますか。

1レコード1枚の領収書とか、

ヘッダー部分と詳細部分のある請求書とか、
詳細がある場合は、詳細の行数とか、

一つの伝票で複数ページになることがあるのかないのかとか、

なるべつ詳細に説明してください。

それぞれで作り方が異なってきますので。

	投稿日時: 20/09/26 23:57:44 投稿者: ナランヤサ
すみませんもう少し説明します・ページヘッダー伝票番号、受注日、店名、などがあります　←テキストボックス商品コード　商品名　数量　金額　単価　←ラベル ---------------- ---------------- ６行分の罫線・詳細商品コード　商品名　数量　金額　単価　←テキストボックス一つの伝票に商品は最大6個なので6行は固定にしてあります商品が3個でも6行で印刷されますこれをA4で印刷しようとすると 6行分の伝票が一つだけ作成されて伝票番号が変わって2枚目3枚目と行きます用紙の無駄なのでできれば1枚の用紙に2つか3つの伝票を入れたいという事です。説明が分かりづらいかもしれませんがよろしくお願いいたします。

投稿日時: 20/09/26 23:57:44

投稿者: ナランヤサ

すみませんもう少し説明します

・ページヘッダー
伝票番号、受注日、店名、などがあります　←テキストボックス

商品コード　商品名　数量　金額　単価　←ラベル
----------------
----------------
６行分の罫線

・詳細
商品コード　商品名　数量　金額　単価　←テキストボックス

一つの伝票に商品は最大6個なので6行は固定にしてあります
商品が3個でも6行で印刷されます

これをA4で印刷しようとすると
6行分の伝票が一つだけ作成されて伝票番号が変わって2枚目3枚目と行きます
用紙の無駄なのでできれば1枚の用紙に2つか3つの伝票を入れたいという事です。

説明が分かりづらいかもしれませんがよろしくお願いいたします。

	投稿日時: 20/09/28 08:41:29 投稿者: hatena
ページヘッダーに6行分の罫線を配置してあるということですか。下記で紹介されている方法と同様のことをしているということでしょうか。レコードがない場合も用紙の最後まで罫線を出力する - hatena chips https://hatenachips.blog.fc2.com/blog-entry-17.html この方法では難しいですね。下記のリンク先の方法を応用すれば可能です。レコードがない場合も用紙の最後まで罫線を出力する NextRecord版 - hatena chips https://hatenachips.blog.fc2.com/blog-entry-91.html

投稿日時: 20/09/28 08:41:29

投稿者: hatena

ページヘッダーに6行分の罫線を配置してあるということですか。
下記で紹介されている方法と同様のことをしているということでしょうか。

レコードがない場合も用紙の最後まで罫線を出力する - hatena chips
https://hatenachips.blog.fc2.com/blog-entry-17.html

この方法では難しいですね。
下記のリンク先の方法を応用すれば可能です。

レコードがない場合も用紙の最後まで罫線を出力する NextRecord版 - hatena chips
https://hatenachips.blog.fc2.com/blog-entry-91.html

	投稿日時: 20/09/28 13:56:57 投稿者: ナランヤサ
>レコードがない場合も用紙の最後まで罫線を出力する NextRecord版 - hatena chips >https://hatenachips.blog.fc2.com/blog-entry-91.html 作り方は違いますが形はほぼこれですこれを最大6行にして1枚の用紙に二つか三つのデータを入れたいので上のリンク先を参考にいろいろやってみます。

	投稿日時: 20/09/28 14:13:03 投稿者: hatena
https://hatenachips.blog.fc2.com/blog-entry-91.html では、既定行数に達したら、 ForceNewPage = 2 で強制的に改行してますが、この部分を削除して、あとは、レポートの上下余白やセクションの高さを調整して、3伝票分で自然改ページするようすればいいでしょう。