Excel2000で複数のシートを両面印刷したい。マクロで可能でしょうか？

みなさん、いつもご丁寧に回答いただき有難うございます。

　作業環境：
　　　Windows XP Homeedithon
　　　Excel2000 SP3
　　　Canon ip4200（プリンター）

　Excelで複数のシートがあり、それぞれを同時に両面印刷したい場合、現在はシート毎に印刷設定をしています。（シートを複数選択した状態で印刷設定した場合、最初に選択したシートにのみ印刷設定がされてしまうため）

　その作業を簡略化するため、マクロ機能を利用して両面印刷設定をしたいのですが、そのようなことは可能なのでしょうか。マクロの作業記録機能を用い、印刷設定を試してみましたが、どうやら両面印刷のチェックは無視されたようです。

　ご回答、よろしくお願いいたします。
　

No.6 ベストアンサー 回答者： noname#79209 回答日時： 2008/03/24 16:29

#3です。

> 次回にそのソフトから出力されたExcelファイルには、両面印刷のチェックが外れています。
> これは、ソフト側の問題なのでしょうか。ちなみに、ソフトは『楽々ケアプラン』というものです。

多分「ソフト側の問題」です。
そのソフトはプリンタが「両面印刷」に対応しているかどうかなど斟酌していないはずです。
私の回答はプリンタが持っているオプションを指定しているので、そのソフトが毎回新たなエクセルファイルを出力するのであれば、
毎回指定することになるでしょう、
一度、システムプラネット社に問い合わせた方が良いでしょう。

この回答への補足

vizzar さん、おはようございます。昨日はアドバイス有難うございます。

　システムプラネット社に問い合わせましたら、意外にも簡単に解決策がわかりました。社の回答を要約します。

・当該ソフトで出力するファイルは、Excel のオリジナルファイルをもとに、別ファイルを生成している。

・そのため、オリジナルファイルの印刷設定（デフォルト設定となる）を変えることで、生成ファイルの設定も引き継がれる。

・具体的には「オリジナル」フォルダに入っている、雛形ファイルを開け、印刷設定を変更し保存する。そして、当該ソフトを起動し、印刷用ファイルを生成すると、そのファイルの印刷設定が、雛形ファイルの設定を引き継いでいる。

　ということでした。

　これにて、本問題は解決しました。皆様、有難うございます。

補足日時：2008/03/25 10:23

この回答へのお礼

vizzar さん、何度もご回答ありがとうございます。

　今回の件について、vizzar さんのアドバイスの通り、システムプラネット社に直接問い合わせてみることにします。

　また、結果はこちらでお知らせしようと思いますので、数日お待ちください。よろしくお願いします。

お礼日時：2008/03/24 17:50

No.5 回答者： Wendy02 回答日時： 2008/03/24 15:57

こんにちは。

>当該ファイルを保存しても、そのあとに同名ファイルとして上書きされたファイルを開けると、設定が元に戻る（両面印刷のチェックが外れている）のです。

その件は、一応、言われると思っていました。それは想定していました。
作業グループからの印刷は、特別な場所をとっていますから、設定自体は保存されません。（これに対する方法はあります。）

ただ、もう一度確認してほしいのですが、プリンタのデフォルトの設定が反映する方法です。

通常、アプリケーションの外からプリンタの設定をした場合は、プリンタの設定を制御できるアプリケーション・ソフトはないと思うのです。VBAから、プリンタの両面印刷を操作できる方法がないのと同じように、アプリケーションソフト自体もないと思います。

スタート－コントロールパネルとかいう方法でもよいのですが、Canon などは、ユーティリティ・ソフトがありますから、そこで、ソフトを開いていない状態で、両面印刷を設定してから、ソフトを起動して、同じ作業を行ってみたらどうでしょうか？

別案としては、保存する方法ではなく、臨時のシートを作ってしまうのです。そして、そのシートで印刷するという方法です。画面の画像をリンク・コピーして張り付けるという方法ですと、元のシートに反映して、元のシートが変われば、臨時のシート側も変わります。そのシートの設定なら、試してみましたが、こちらでは保存はされました。

この回答へのお礼

Wendy02 さん、ユニークなご提案ありがとうございます。

>スタート－コントロールパネルとかいう方法でもよいのですが、
>Canon などは、ユーティリティ・ソフトがありますから、そこで、ソ
>フトを開いていない状態で、両面印刷を設定してから、ソフトを起動
>して、同じ作業を行ってみたらどうでしょうか？

　試してみましたが、残念ながら反映されませんでした。当該ソフトが設定を無視するようです。

　臨時のシートを使う方法ですが、失礼ですが、方法がわかりませんでした。

　０）プリンタのユーティリティソフトで両面印刷をチェックして　　　　おきます。
　
　１）私が印刷したいブックには、２シートあります。

　２）それに、１つ臨時シートを挿入します。

　３）２シートの表を画像として臨時シートに貼り付けます。

　４）そして、両面印刷します。

　ということでしょうか。

お礼日時：2008/03/24 17:56

No.4 回答者： Wendy02 回答日時： 2008/03/24 14:57

こんちには。

たぶん、作業グループにすること自体は間違いないと思います。

>そのソフトでExcelシートファイルを作成した場合、「スタート」の中にある「設定」「プリンタ」で設定した、プリンタの初期設定が反映されないのです。

本来は、Windowsメニューの[スタート]からの設定と、個々のソフトウェアとは直接には結びつかないはずです。

もう一度試してみていただきたいのは、作業グループにした後に、印刷プレビューを行い、まず、次ページに、次のシートが入っているか確認し、

次に、
------------------------------------
[設定(印刷プレビュー内）]－[ページ]－[オプション]
------------------------------------
Canon iP4200 プロパテイ－ページ設定

[両面印刷]にチェックを入れます。
------------------------------------
そうしたら、解決するはずだと思っています。（通常、作業グループは残りませんので、シートごとに、印刷の設定が必要かもしれません。）

私の記憶が確かなら、ブックか、シートに対してプリンタ側のプロパティも保存されるはずです。

なお、マクロの方は、こちらが解決しないと先に進めません。

この回答へのお礼

Wendy02 さん、何度も有難うございます。

>本来は、Windowsメニューの[スタート]からの設定と、個々のソフトウェアとは直接には結びつかないはずです。

　そうなのですね。知りませんでした。そう考えると、このソフトから出力されたファイル（常に同じファイル名で上書きされる）の印刷設定が、コントロールパネルでの設定が反映されないことが理解できます。

　そして、お教えいただいた方法を試しました。確かに、シートごとに両面印刷の設定をする必要があります。しかし、当該ファイルを保存しても、そのあとに同名ファイルとして上書きされたファイルを開けると、設定が元に戻る（両面印刷のチェックが外れている）のです。

　これは、このソフトウェア会社に問い合わせるのが一番でしょうか。

お礼日時：2008/03/24 15:13

No.3 回答者： noname#79209 回答日時： 2008/03/24 14:29

私のプリンタは4100Rですが、

各シート毎にページ設定をしておけば可能かと...
1.「ファイル」－「ページ設定」で「ページ」タブをクリック
　（普通はこのタブが最初に選択されている）
2.「オプション」ボタンをクリック
3.「Canon PIXUS iP4200のプロパティ」のウインドが表示されるので、
　「ページ設定」タブをクリック。
4.「両面印刷」チェックボックスをクリックしてチェックをつける。
5.「OK」ボタン（２回）で終了。

上記を各シート毎に設定しておけば良いはずです。

この回答へのお礼

vizzar さん、ご回答有難うございます。

　vizzar さんがお教えいただいた方法で試してみるのですが、設定した回はそれが反映されるのですが、次回にそのソフトから出力されたExcelファイルには、両面印刷のチェックが外れています。

　これは、ソフト側の問題なのでしょうか。ちなみに、ソフトは『楽々ケアプラン』というものです。

お礼日時：2008/03/24 15:08

No.2 回答者： Wendy02 回答日時： 2008/03/24 12:31

こんにちは。

プリンタには、両面印刷機能があるのですから、後は、シートを複数選択した作業グループにして印刷すればよいのではありませんか？

この回答へのお礼

Wendy02 さん、ご回答有難うございます。

　私も最初その通りに試してみたのですが、実現しませんでした。私が利用しているのは、あるExcelとAccessを利用したソフトウェアなのですが、そのソフトでExcelシートファイルを作成した場合、「スタート」の中にある「設定」「プリンタ」で設定した、プリンタの初期設定が反映されないのです。

お礼日時：2008/03/24 14:13

No.1 回答者： imogasi 回答日時： 2008/03/24 12:16

両面印刷といっても発達段階で色々あるのでは

（１）ユーザーが全てプログラムを組んで１，３，５・・を印刷させて折り返し点で、人手で印刷済み紙の束を裏返しセットする。
（２）１ページ飛ばしはプリンタなどのドライバが行う。
表面印刷が最後まで行くと、裏面セットの促しのメッセージが出て
ＯＫで裏面印刷（ページ数的にとびと）に入る。
印刷済み紙の束を裏返しセットするのは人手で行う。
（３）紙の１枚について表印刷が終ると、次のページをその紙裏面にも印刷を行うマシン的な機構が備わっている。高級機種。そういうのも現在では販売されてあるようだ。
http://www.redhat.com/docs/manuals/enterprise/RH …の
7.1.1.1. 機能参照

ーー
普通はル両面印刷とは、（２）がほとんどでしょう。
ーー
以上はシート１枚での他ページに渉る印刷の場合ですが、
ＶＢＡでＰａｇｅＳｅｔＵｐはシートオブジェクトごとの設定なので
シートごとに設置は必要でしょう。
それに多シートの場合、両面印刷とはいっても１シートの終わりが表だった場合、裏面は飛ばして次シートを表に印刷するのか、色々あるので、ニーズはどうなのかな。
やはりシート単位にやらないとシステムも大変ではないかな。
この質問は両面印刷＋多シートを一遍に（両面）印刷の複合型ですか。

この回答へのお礼

imogasi さん、ご丁寧に回答いただき有難うございます。

　私が今利用しているプリンター『Canon ip4200』は、３年ほど前に購入したのだと思いますが、家庭でのパーソナルユーズ機種ながらも「自動両面印刷」が可能となっています。

　また、ＶＢＡでＰａｇｅＳｅｔＵｐはシートオブジェクトごとの設定ということですので、マクロでも複数のシートに同時に印刷設定するのは困難だということでしょうか。

>この質問は両面印刷＋多シートを一遍に（両面）印刷の複合型ですか。

　はい。その通りだと思います。シート「A」、シート「B」の二枚がありまして、それぞれA4１ページ分の印刷範囲ですから、表裏両面印刷にして１枚のA４用紙が必要です。

お礼日時：2008/03/24 14:02