Accessで伝票印刷

質問

Accessレポートにて、伝票を印刷したいと思っています。
詳細に印刷される数が伝票により１～７行の範囲です。
詳細部分には、伝票の枠（罫線）も印刷されるように設定しています。
印刷される行数が、７行以下の場合は、７行になるまで
枠だけ印刷されるようにしたいのですが、どのようにしたらいいでしょうか？

よろしくお願いいたします。

回答No.5

keikan · ベストアンサー

これらを参考にしてください。
http://support.microsoft.com/default.aspx?scid=kb;ja;404909

http://support.microsoft.com/default.aspx?scid=kb;ja;416039

お礼

ありがとうございます。
わたしも、上記のサポートを見つけて、コードを書いたらうまくいったところです。

回答No.4

snoopy64

＃１です。
＞伝票が５０枚あるとすると、５０データ分、件数を確認し、空白行を追加するという作業をすることになるんですよね？

もちろん、手作業でやっていては日が暮れてしまいますので、ＶＢＡのコードを書く（プログラム）ことになります。
伝票番号の範囲を入力してボタンを押すと、上記の処理をしてくれて、レポートを印刷するところまでプログラムになります。

難しいですよね・・・でも僕にはその方法しかわかりません。ご期待の回答ではなくてすみませんでした(>_<)

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

回答No.3

snoopy64

＃１です。
＃２の方の回答を見て、やっぱりこの方法で間違ってなかったんだと、変な安心（？）を少ししてしまいました(>_<)

さて、補足に対して回答します。
具体的に言いますと、事前に印刷用テーブルを用意しておき、印刷レポートを起動する前に、伝票テーブルから印刷用テーブルにデータを書き出し、さらにその書き出した件数に応じて空白のレコードを追加し、印刷レポートのデータソースは印刷用テーブルにする、ということです。
明細が３行なら、４件の空白レコードを印刷用テーブルに追加します。
空白レコードとはいっても、それらが明細の後ろに集まるように、ソート用に行番号は必要だと思いますので、その辺は適宜ってことで。
いかがですか？
頑張ってくださいヽ(^。^)ノ

補足

度々、ありがとうございます。
ということは、伝票が５０枚あるとすると、
５０データ分、件数を確認し、空白行を追加するという作業をすることになるんですよね？

回答No.2

laputart

過去作った伝票用レポートの仕方として
(1)印刷用テーブルを別に作成する

例　伝票印刷用T
伝票明細印刷用T

※このテーブルは印刷用で印刷する前には全て
のレコードを削除する
※これらは元テーブルと同じ形式にする但し
伝票明細印刷用Tには行番号(1-7)を持たせて
初期値は空白の設定をする

これに元テーブルで抽出した伝票と伝票明細を
転送して印刷する

この場合マクロやVBAが必要です。
-----------------------
あるいは#1の方の説明のように7-n行の空白レコードを
作成する必要があります。
レポートのデザインでは行数が少ないとき枠だけ印刷するという設定はどうしても出来ないようです。

お礼

お答えいただいてありがとうございました。
やはり、ＶＢＡで書くしかないですね。

回答No.1

snoopy64

印刷用テーブルに詳細レコードｎ件＋空白レコード７－ｎ件を追加（常に７件になるように）しておき、レポートのデータソースでこのテーブルを指定するのはどうでしょう。
僕はいつもこうやってます。
うまい方法があるなら僕も知りたいです。
頑張ってくださいヽ(^。^)ノ

補足

早速、ご回答いただきありがとうございました。
テーブルに件数の設定をするというのは、レポートの
データソースになっているテーブルに、新しいフィールドを
設定してということでしょうか？
よろしくお願いいたします