Document Image Writerでファイル出力時にドキュメントイメージを表示したくないが?
Question 101.1   Previous Next
EXCELの印刷マクロにおいて、Document Image Writerでファイル出力していますが、それと同時にDocument Image Writerのプレビュー画面が表示されます。
この画面を表示させずに、ファイル出力のみにするマクロはどのようにすればよいのでしょうか。
EXCELマクロで大量に印刷ファイル出力した場合に、Document Image WriterのWINDOWが多数表示され、ハングアップしてしまいます。
お忙しいところ申し訳ありませんが、お教えいただけないでしょうか。
現在使用しているマクロは下記のとおりで、Excel 2003 を使っています。
  Application.ActivePrinter = "Microsoft Office Document Image Writer on Ne00:"
  ActiveSheet.PrintOut printtofile:=True, PrToFileName:=Filename
Answer   Copyright (C) 2010.4.9 永井善王
大規模な業務をなさっているようで、大変ですね。
ご質問文には 『・・同時にDocument Image Writerのプレビュー画面が表示・・』 とありますが、出力されたファイルに関連付けされたアプリケーションによって表示されたウィンドウ (【C図】のようなもの) のことを言ってみえるのでしょうね?
少しでも解決に近付くことができればと思って、再現テストと試行錯誤を重ねてみました。 以下にまとめておきますが、パーフェクトな回答ではないかも知れません。
【A図】 再現テストで使用したマクロ
Sub ta4_2003()
 Filename = "ta4_2003.tif"
 Application.ActivePrinter = "Microsoft Office Document Image Writer on Ne01:"
 ActiveSheet.PrintOut Preview:=False, printtofile:=True, PrToFileName:=Filename
End Sub
(注1) Preview:=False, は有っても無くてもよいが Preview:=True, にするとプレビューになる
【B図】 再現テスト用のシート        【C図】 マクロ実行により自動的に表示されたWindow
  
【A図】のマクロを実行すると「Microsoft Office Document Image Writer」は、TIFFファイル(注2)を作成してくれます。
拡張子「.tif」の関連付けは 「Microsoft Office Document Imaging」 にしてあるので、【C図】の画面が表示されます。
(注2) TIFF (Tagged Image File Format) 形式の画像ファイル

関連付けを無くして成功
「Microsoft Office Document Image Writer」は、TIFF形式だけでなく MDI (Microsoft Document Imaging) 形式のファイルを作成することも可能です。
ちょうど都合がよいことにテスト環境では、拡張子「.mdi」は何の関連付けもされていません。
そこで、【A図】のマクロの2行目を
Filename = "ta4_2003.mdi" に変更して実行してみました。
すると、【C図】の画面が表示されることなく、カレントフォルダーに MDIファイルが作成されました。 … 成功!

(備考) TIFFファイルでも関連付けを無くせば成功するのではと試みてみました。が出来ませんでした。 もし貴方が成功されたら、私にもやり方を教えてください。

参考
手作業で行う場合は、 [通常使うプリンター] として [Microsoft Office Document Image Writer] を設定してある状態で、
[ファイル(F)]メニュー → [印刷(P)] とクリックし、表示された [印刷]ダイアログボックスの [OK]ボタンをクリックすると、 [名前を付けて保存]ダイアログボックスが表示されます。

そこには右図のように [ドキュメント イメージの表示(V)]チェックボックスがあるので、チェックを消してから [保存(S)]ボタンをクリックします。
すると、ファイルが正しく保存され、ドキュメントイメージは表示されないで終了します。

一方、チェックを付けてから [保存(S)]ボタンをクリックすると、ファイルが保存された後に、ドキュメントイメージが表示されます。

いずれの場合も、ファイルの種類が MDIか TIFFか、関連付けがしてあるかどうかは無関係のようです。

マクロでも、これに相当する制御を行うことができるとよいのですが、現在のところ私はお教えすることができません。はっきり言えることは、この操作はマクロ記録されますが、希望するようには動作してくれません。
今後、貴方もチャレンジされるでしょうから、情報が得られたらぜひ私にも教えてください。 お待ちしています。
ありがとうございました
早速のご回答ありがとうございました。
現在は、mdi形式で印刷しているので、早速mdi形式の関連付けをはずして、実行してみました。 しかし、Microsoft Document Imagingの画面が表示されます。
そこで、Microsoft Document Imagingの通常印刷設定を、tiff形式にしてみると、見事Microsoft Document Imagingは起動されずに、ファイル作成だけ可能となりました。
どうも、
①mdi形式の関連付けをはずす
②Microsoft Document Imagingの通常印刷設定を、tiff形式にする
の二つを実施する必要があるようです。
tiff形式においても、その逆でできるかどうかやってみます。 結局、マクロとは全然関係ないところで、試行錯誤していただき、まことにありがとうございました。
これで、業務がスムーズにすすみます。 ありがとうございました。

 

Excel VBA Macro