ExcelVBA パワーポイント、Wordの処理を早くする方法

Question

Excelファイルを扱う場合はApplication.ScreenUpdating = Falseで画面更新を停止すると処理が早くなりますが、
パワーポイント、Wordのファイルを扱う場合に同様に処理を早くする方法はあるのでしょうか？
下記は高速化したいWord、パワーポイントのファイルをPDF化するExcelVBAマクロのコード（一部抜粋）です。

Excelファイルの場合はApplication.ScreenUpdating = Falseで高速でPDF化できるのですが、
Word、パワーポイントは時間がかかってしまいます。

【Wordの場合】

Set objOffice = CreateObject("Word.Application")
            With objOffice.Documents.Open(Path)
                .ExportAsFixedFormat OutputFileName:=filePath, _
                ExportFormat:=17
                .Close
            End With

【パワーポイントの場合】

            Set objOffice = CreateObject("Powerpoint.Application")
            With objOffice.Presentations.Open(Path)
                .SaveAs fileName:=filePath, FileFormat:=32
                .Close
            End With
            objOffice.Quit

Comments

[mattuwan]

＞Excelファイルの場合はApplication.ScreenUpdating = Falseで高速でPDF化できるのですが、
＞Word、パワーポイントは時間がかかってしまいます。
Application.ScreenUpdating = Falseで、体感できるほど速くなっています？
ExcelVBAでってことは、Excelファイルは、すでにエクセルが起動した状態からのスタートですが、
ワードやパワーポイントはアプリケーションを起動させるところからのスタートですよね？
その違いではないでしょうか？

[occho222]

Excelファイルの場合、Application.ScreenUpdating = False によって体感少し早くなりますが、Application.ScreenUpdating = Falseがなかったとしても数秒で終わるのであまり違いはありません。
パワーポイントやWordは理由はわかりませんがファイルによってはPDF化に10秒以上かかることがあります。

[vann_2921]

速く処理したい理由は何でしょうか？連続で実行したい場合はコード全体を見直すことで解決するかもしれません。例えば1ファイルごとにCreateObjectすると遅くなりそうです。
10秒以上かかるのは1ファイル当たりですか？ワードやパワーポイントのファイルサイズが大きい場合は処理を早くするのは無理です。
まずは遅くなる理由を探るのが重要です。理由はわかりませんと言われると回答者も困ってしまいます。

Answer 1

Excelは、複数のセルに演算式が書かれている場合に画面上のそれらのセルの内容を表示（画面更新）しようとします。それは、CPUの負荷を高くします。

Application.ScreenUpdating = False　を指定すると、Excelは画面更新をしないので、その分Excelの動作が早くなります。

Word、パワーポイントのファイルをPDF化する場合、Excelの画面更新は関係しないのでApplication.ScreenUpdatingの設定は影響しません。

Adobeのページ　Word から PDF ファイルを作成する際の推奨事項 （Windows 版 Acrobat 6.0/7.0）
に、Adobe PDF プリンタに印刷するのが「早くて簡単」と書かれています。
もし、Adobe PDF プリンタへの印刷以外の方法でPDF
PDF化しているのなら、試してみてください。

Adobe PDF プリンタに印刷だと、埋め込まれたタグやスタイル等の情報が失われることにも注意が必要です。