ExecWBを使用しての印刷

Question

VBスクリプトを使用してエクセルファイルの印刷についての質問です。

IE上でVBスクリプトを使用しエクセルファイルの印刷を行うプログラムを作成しています。
ExecWBを使用し印刷ダイアログを表示せずに印刷自体は出来るのですが、
先頭のシート（開いたときに表示されるシート）しか印刷されません。

ExecWBの引数または組み合わせなどで、全てのシートを印刷することは可能でしょうか？

実装は以下のように行っています。

' IEのオブジェクトを生成
Set obj = CreateObject("InternetExplorer.Application")

' IEの非表示などは省略します

' IE上にエクセルファイルのロード
obj.Navigate "エクセルファイルのパス"

' 読み込み完了までの待機は省略します。

' ExecWBを使用し、IE上のエクセルを印刷
obj.ExecWB 6,2


ご存知の方がいましたら、アドバイスをよろしくお願いします。

Answer 1

ExecWBの引数または組み合わせなどで、全てのシートを印刷することは可能でしょうか？

全シート印刷はあくまで EXCEL の機能なので、
ExecWB の引数または組み合わせだけでは全シートの印刷は無理だと思います。

EXCEL ファイルを開いた時に VBA を実行させる等、EXCEL 側になんらかの仕掛けが必要でしょう。

Answer 2

＞ひらぽんさん

レスありがとうございます。
やはりExecWBからの指定は無理なんですね。

ありがとうございました。

Answer 3

こんにちは、フォーラムオペレーターの高橋春樹です。

ひらぽんさん、いつもお世話になっております。

Rectifierさん、初めまして。
MSDNフォーラムのご利用ありがとうございます。

今回、ひらぽんさんからの投稿が有用な情報だと思いましたので、
勝手ながら、ひらぽんさんからの投稿に、回答マークを付けさせてもらいました。

今後ともMSDNフォーラムを宜しくお願いします。

---

マイクロソフト株式会社 フォーラム オペレーター 高橋春樹