締切済み

エクセルVBAで、プリンタ名とプロパティを指定したい

2004/10/26 13:51

Excel97を使用しています。用紙サイズ：A4縦の書類を2ページ作成しました。書類は縦並びになっています。これをエクセルVBAを使って、A4の用紙に両面印刷するか、A3横の用紙に割付印刷したいのですが方法はありますでしょうか？エクセルのページ設定でA3横にして横並びで作成しようとしたのですが、行の高さがページ毎で異なっていますので、横並びでは作成できませんでした。ワークシート上にボタンを作成しましたので、それをクリックするだけで、特定のプリンタ名を指定し、そのプリンタのプロパティで両面もしくは割付印刷を設定して印刷させたいのです。ご存知の方、どうぞよろしくお願いいたします。

takahiro_
お礼率91% (89/97)

オフィス系ソフト
回答数1
ありがとう数6

みんなの回答 （1）
専門家の回答

みんなの回答

imogasi
ベストアンサー率27% (4737/17070)

2004/10/26 14:27 回答No.1

（１）特定のプリンタ名を指定し、 http://www.asahi-net.or.jp/~ZN3Y-NGI/YNxv261.html#5 に、ピッタリの解説があります。（２）用紙サイズ：A4縦の書類 With ActiveSheet.PageSetup .PaperSize = xlPaperA4 .Orientation = xlPortrait End With 他の設定項目はわざと省略。Ａ３の用紙ではあるが、印刷内容がＡ４なので、Ａ４で印刷を指定で良いと思うが、自信なし。（３）A3横にして横並びで下記で、Ｚ型の印刷順序しませんか。（普通はＮ型）上左部－－＞上右部改ページ下左部－－＞下右部（４ページの場合）と印刷すると思いますが、Ａ３プリンタ使ったことなく自信なし。 With ActiveSheet.PageSetup で .Order = xlOverThenDown Ｂ４、Ａ３プリンタでテスト出来る環境でないので、済みません。