Excelで左側に１ページ目、右側に２ページ目を印刷したい。

質問

過去ログを検索したのですが
希望の回答が得られなかったで、よろしくお願いします。

Excel2000にて、A5サイズの表を２ページ作成しました。
これを、A4横の用紙に
「左側に１ページ目、右側に２ページ目」となるように
印刷したいのですが、どのように設定すれば
良いでしょうか？
（できれば３ページ目以降も同じように印刷したい）

ファイル→ページ設定や、プリンタの設定も
いじってみたのですが、どうしても
「１ページに１枚」しか印刷できません。

プリンタ設定の「ページレイアウト」に
「１枚に印刷するページ数」を指定する項目が
あるのですが、変更しても反映されません。

プリンタはCANONのLBP910です。
同じような環境の方、ご存知の方がいらっしゃいましたら
ご回答お待ちしています。

回答No.4

NIWAKA_0 · ベストアンサー

使っているプリンタは違うのですが・・・
ウチでは集約印刷の場合、印刷プレビューではP1とP2は
別ページとして表示されますが、実際に出してみると
ちゃんと集約して出してくれました。
ということは（多分）集約印刷機能はエクセルの方では
感知してないんじゃないかと思われます。

だからやはり、プリンタの設定ではないかと・・・
用紙の向きの設定などは合っていますか？

あとは・・・念のため、プリンターのドライバーを最新のものに更新してみるとか・・・

参考URL：

http://cweb.canon.jp/drv-upd/lasershot/index-j.html

お礼

結局、プリンタドライバが古いために
うまく動作しなかったようです。
ご指摘の通り、エクセルでは集約機能は
感知していないようですね。
微妙に不便ですよね・・・。

回答No.7

imogasi

ＶＢＡで考えて見ました。
ポイントは例えば、
（１）Ａ１：Ｇ３５を第１ページとし、本来は第２ページに当たるＡ３６：Ｇ７０を、ワークシート表上の右部分Ｈ１：Ｎ３５にコピーする。
そしてＶＢＡからＡ１：Ｎ３５の範囲の印刷起動をかける。
（２）３５＊２のサイクルで（１）を繰り返す。
（３）ページ数は、左フッターに１と２、３と４・・を
印刷する都度ＶＢＡでセットして印刷する。左第１ページと右第２ページの数字印字位置を上手くスペースをいれて、調節する必要があると思い空白列にする。
（４）左余白と表のＡ１：Ｇ３０とＨ１：Ｎ３５（コピー後で）をバランス良く調節するために、Ｈ列は空白列とし、列幅を調節し、Ｉ１：Ｏ３５へコピーすべきかもしれない。
（５）Ａ４横の設定は必須。
（６）フォントサイズや列幅で影響を受けるので、初めは
手探りで調節する必要あり。これが手間がかかる。
行数が少なければ、手作業でコピーしフータを手動で
セットの方が早いかもしれない。
コーディング例を上げます。
＝＝＝＝＝＝＝＝＝＝＝＝＝
Sub test01()
'列は何列までデータがあるか。H列なら８。７はＧ列
retu = 7
' 1ページは何行か。３５行とする
gyou = 35
'スタート行は第１行とする。
sgyou = 1
pageno = 1
Worksheets("sheet1").Activate
d = Range("A2").CurrentRegion.Rows.Count
MsgBox d
'--------
p = gyou * 2
For i = sgyou To d Step p
Range(Cells(i + gyou, 1), Cells(i + gyou * 2 - 1, retu)).Copy
'第retu列＋１列は空白で空ける。本ケースではＨ列。
Cells(i, retu + 2).Select
ActiveSheet.Paste
'----フーターのページ数設定
s = Space(50) & Str(pageno) & Space(130) & Str(pageno + 1)
ActiveSheet.PageSetup.PrintArea = ""
With ActiveSheet.PageSetup
.CenterFooter = ""
.LeftFooter = s
End With
'------印刷
Range(Cells(i, 1), Cells(i + gyou - 1, retu * 2 + 1)).PrintOut
'----ページ数＋２と右側の範囲クリア
pageno = pageno + 2
Range(Cells(i, retu + 1), Cells(i + gyou, retu * 2 + 1)).Clear
Next i
'--------
End Sub

お礼

すみません、わざわざ考えて頂いたのですが、
VBAはサッパリ理解できません・・・。
原因はプリンタドライバが古いせい、と言う
超単純な物だったのです。
お時間取らせてしまって申し訳ないです。

回答No.6

noname#169116

#2です。

わたしも１枚のシートにぎりぎりの表を作ってフッタ付で印刷してみましたが、２枚横に並んで見開きで印刷できました。
紙はA4、用紙サイズもA4です。
訂正があります。このように出すときはうちのプリンターの場合タテ方向でないと横に並びませんでした。

注意点は下にも書いたように、余白はやはり１cmくらい必要であること。
あと、図のように表と表の間がそれなりに空いてしまうことです（差込印刷みたいな感じなのであたりまえかもしれません）

□□□ □□□
□□□ □□□
□□□ □□□
□□□ □□□
　１　 　２

お礼

プリンタドライバを最新の物にしたら、
正常に印刷できました。
どうしてもキレイにレイアウトしたいときは、
以前のように縮小コピーを駆使するのも
良いかも知れませんね。
紙はもったいないですが・・・。

回答No.5

noname#169116

ページ番号がありましたか。
そうすると、A4の半分はたしかにA5ですが、余白が１cmほどしかないぎりぎりの表を作られた場合、フッターもありますので、表をある程度小さくしないとA4の横にははいらないと思います。

通常（用紙サイズを変えずに出す場合は）余白は1cm強は必要です（ページ番号もその内側に）。

あとわたしがよくやるのは、用紙サイズを１回り大きいもの、たとえばA4ではなくてB4やレターなど（ただしプリンターの設定による）をわざと選んで、A4ぎりぎりに出せる場合があります。A4用紙設定がもつ余白を無視するやり方です。
しかしすべてのプリンターで成功するとはかぎらないみたいです。

お礼

ご回答ありがとうございました。
プリンタドライバを最新の物にしたら、
正常に動作しました。
ページ番号を入れる際には、ご回答頂いた方法も
試してみようと思います。

回答No.3

noname#169116

#2ですが、補足しておきます

プリンタ設定で１枚にうまく見開きで収まらない場合に、[改ページプレビュー] で見開き状態を１ページとして、A4の横に入れようとしています。
プリンタ側で拡大率の調整が必要かもしれません。

あとシートごとに、手作業で見開きで入れていく場合は、
シートの見開きをマウスで選択して、
[ファイル]→[印刷範囲の設定]で設定してしまうやり方もあります。

どちらかではいるはずです（用紙の横印刷設定はお忘れなく）

お礼

ご回答ありがとうございます。

改ページプレビューで改ページ位置を変更すると、
確かに１枚に２ページ（以上）は入りますが・・・。

すみません、ページ番号は変えたくないんです。

たぶんプリンタ設定の問題ですよね。
マニュアルを見ても、私が今やっている方法で
間違いないみたいだし・・・だけど出来ないんですよねえ・・・。

ちなみに、同じプリンタを使っている別の人は
「A5でそのまま（2枚に）印刷して、２枚くっつけて
　コピー機でコピーしている」そうです。
そんなあ・・・。

回答No.2

noname#169116

Excelの
上のメニューから
[ファイル]→[印刷プレビュー]→[改ページプレビュー]
を選ぶと青い線がでてきます。この線をマウスで移動し、用紙に収まるように
します（もとにもどすときは、[改ページプレビュー]が[標準]に変わっていますので、それを押す）

また、1ページ、２ページ‥が横方向か縦方向に繰り返すかは、
[ファイル]→[ページ設定]→[シート]タグを選び
ページ方向というのが下の方にありますので、それで設定します。

回答No.1

noname#3333

プリンタの印字設定（プロパティ）で集約機能はありませんか？
２ページを１ページで印字する機能で
１ページ／２ページ
２ページ／１ページ
とできるかと思います。

うちのプリンタ　エプソンなのですがキャノンでも同じ機能あると思います、、

お礼

早速のご回答ありがとうございます。

おっしゃっている「集約機能」は
プリンタ設定の「ページレイアウト」に
「１枚に印刷するページ数」を指定する項目が あるので、
これに該当するかと思います。

ただ、最初に書いたとおり、この部分を変更しても
反映されないんですよね・・・。
なんでだーー。
他のプリンタでも試してみます。