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

Question

過去ログを検索したのですが
希望の回答が得られなかったで、よろしくお願いします。

Excel2000にて、A5サイズの表を２ページ作成しました。
これを、A4横の用紙に
「左側に１ページ目、右側に２ページ目」となるように
印刷したいのですが、どのように設定すれば
良いでしょうか？
（できれば３ページ目以降も同じように印刷したい）

ファイル→ページ設定や、プリンタの設定も
いじってみたのですが、どうしても
「１ページに１枚」しか印刷できません。

プリンタ設定の「ページレイアウト」に
「１枚に印刷するページ数」を指定する項目が
あるのですが、変更しても反映されません。

プリンタはCANONのLBP910です。
同じような環境の方、ご存知の方がいらっしゃいましたら
ご回答お待ちしています。

NIWAKA_0 · Accepted Answer

使っているプリンタは違うのですが・・・
ウチでは集約印刷の場合、印刷プレビューではP1とP2は
別ページとして表示されますが、実際に出してみると
ちゃんと集約して出してくれました。
ということは（多分）集約印刷機能はエクセルの方では
感知してないんじゃないかと思われます。

だからやはり、プリンタの設定ではないかと・・・
用紙の向きの設定などは合っていますか？

あとは・・・念のため、プリンターのドライバーを最新のものに更新してみるとか・・・

参考URL：http://cweb.canon.jp/drv-upd/lasershot/index-j.html

imogasi · Answer

ＶＢＡで考えて見ました。
ポイントは例えば、
（１）Ａ１：Ｇ３５を第１ページとし、本来は第２ページに当たるＡ３６：Ｇ７０を、ワークシート表上の右部分Ｈ１：Ｎ３５にコピーする。
そしてＶＢＡからＡ１：Ｎ３５の範囲の印刷起動をかける。
（２）３５＊２のサイクルで（１）を繰り返す。
（３）ページ数は、左フッターに１と２、３と４・・を
印刷する都度ＶＢＡでセットして印刷する。左第１ページと右第２ページの数字印字位置を上手くスペースをいれて、調節する必要があると思い空白列にする。
（４）左余白と表のＡ１：Ｇ３０とＨ１：Ｎ３５（コピー後で）をバランス良く調節するために、Ｈ列は空白列とし、列幅を調節し、Ｉ１：Ｏ３５へコピーすべきかもしれない。
（５）Ａ４横の設定は必須。
（６）フォントサイズや列幅で影響を受けるので、初めは
手探りで調節する必要あり。これが手間がかかる。
行数が少なければ、手作業でコピーしフータを手動で
セットの方が早いかもしれない。
コーディング例を上げます。
＝＝＝＝＝＝＝＝＝＝＝＝＝
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

hatfield · Answer

#2です。

わたしも１枚のシートにぎりぎりの表を作ってフッタ付で印刷してみましたが、２枚横に並んで見開きで印刷できました。
紙はA4、用紙サイズもA4です。
訂正があります。このように出すときはうちのプリンターの場合タテ方向でないと横に並びませんでした。

注意点は下にも書いたように、余白はやはり１cmくらい必要であること。
あと、図のように表と表の間がそれなりに空いてしまうことです（差込印刷みたいな感じなのであたりまえかもしれません）


□□□ □□□
□□□ □□□
□□□ □□□
□□□ □□□
　１　 　２

hatfield · Answer

ページ番号がありましたか。
そうすると、A4の半分はたしかにA5ですが、余白が１cmほどしかないぎりぎりの表を作られた場合、フッターもありますので、表をある程度小さくしないとA4の横にははいらないと思います。

通常（用紙サイズを変えずに出す場合は）余白は1cm強は必要です（ページ番号もその内側に）。

あとわたしがよくやるのは、用紙サイズを１回り大きいもの、たとえばA4ではなくてB4やレターなど（ただしプリンターの設定による）をわざと選んで、A4ぎりぎりに出せる場合があります。A4用紙設定がもつ余白を無視するやり方です。
しかしすべてのプリンターで成功するとはかぎらないみたいです。

hatfield · Answer

#2ですが、補足しておきます

プリンタ設定で１枚にうまく見開きで収まらない場合に、[改ページプレビュー] で見開き状態を１ページとして、A4の横に入れようとしています。
プリンタ側で拡大率の調整が必要かもしれません。

あとシートごとに、手作業で見開きで入れていく場合は、
シートの見開きをマウスで選択して、
[ファイル]→[印刷範囲の設定]で設定してしまうやり方もあります。

どちらかではいるはずです（用紙の横印刷設定はお忘れなく）

hatfield · Answer

Excelの
上のメニューから
[ファイル]→[印刷プレビュー]→[改ページプレビュー]
を選ぶと青い線がでてきます。この線をマウスで移動し、用紙に収まるように
します（もとにもどすときは、[改ページプレビュー]が[標準]に変わっていますので、それを押す）

また、1ページ、２ページ‥が横方向か縦方向に繰り返すかは、
[ファイル]→[ページ設定]→[シート]タグを選び
ページ方向というのが下の方にありますので、それで設定します。

noname#3333 · Answer

プリンタの印字設定（プロパティ）で集約機能はありませんか？
２ページを１ページで印字する機能で
１ページ／２ページ
２ページ／１ページ
とできるかと思います。

うちのプリンタ　エプソンなのですがキャノンでも同じ機能あると思います、、

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

使っているプリンタは違うのですが・・・

ＶＢＡで考えて見ました。

#2です。

ページ番号がありましたか。

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

Excelの

プリンタの印字設定（プロパティ）で集約機能はありませんか？

似たような質問が見つかりました

このQ&Aを見た人はこんなQ&Aも見ています

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

このQ&Aを見た人がよく見るQ&A

デイリーランキングこのカテゴリの人気デイリーQ&Aランキング

マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング