none
ExecWBを使用しての印刷 RRS feed

  • 質問

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

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

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


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


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

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

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

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

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


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

    2009年10月31日 6:47

回答

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


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

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

    2009年11月3日 3:19
    モデレータ

すべての返信

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


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

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

    2009年11月3日 3:19
    モデレータ
  • >ひらぽんさん

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

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

    2009年11月4日 0:45
  • こんにちは、フォーラムオペレーターの高橋春樹です。

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

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

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

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


    マイクロソフト株式会社 フォーラム オペレーター 高橋春樹
    2009年11月13日 5:45