[[20150302100519]]　『差込印刷』（aimi）　ページの最後に飛ぶ

『差込印刷』（aimi）

Sub 請求書(a)

 SNO = InputBox("開始No.を入力")
ENO = InputBox("終了No.を入力")
For I = SNO To ENO
 Worksheets("Sheet2").Range("A1") = I
 ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
 Next I
 End Sub

上記の様にマクロでＡ４横左半分に印刷するようにしましたが、Ａ４に請求書２件分の印刷をできるマクロを教えてください。
請求書データは、ＶＬＯＯＫＵＰで表示、検索値は「Ａ］、請求データは、２０件

＜使用 Excel：Excel2007、使用 OS：Windows7 ＞

 A4の横サイズで、1頁2件分のフォーマットがあればできますが
 そうでなければ、A4縦サイズ（又はA5縦サイズ）のフォーマットを

 プリンタの設定で割り付け印刷

 でないと対応できないと思います。

 なのでマクロ側で制御できる問題ではございません。

http://www.epson.jp/products/bizprinter/otasuke/warituke.htm

 提示はエプソンですが、割り付け印刷　＋　メーカー名で出てくると思います。
（稲葉） 2015/03/02(月) 10:23

プリンターの設定で行ってみます
ありがとうございました
（aimi） 2015/03/02(月) 14:47

 試してませんが、割り付け印刷にするにしても、
 1ページずつ印刷を繰り返すマクロなのでだめな気がします。

 ２件分のフォーマットでそれ用のマクロにしたほうが簡単かも。
 割り付け印刷と組み合わせれば、今のフォーマットもそのまま活かせる可能性が高いですし。

（マナ） 2015/03/02(月) 20:31

コメント返信：

[ 一覧(最新更新順) ]

[[20150302100519]] 『差込印刷』（aimi） ページの最後に飛ぶ

[[20150302100519]]　『差込印刷』（aimi）　ページの最後に飛ぶ