屍の山を越えてきた者たちへ：PowerPoint無人バッチ変換の深淵
PowerPointのCOMオートメーションを「深夜のタスクスケジューラ」で動かす。この課題に直面したエンジニアの多くは、最初の一歩で躓く。「なぜかプロセスが残る」「なぜかPDF変換でフリーズする」「そもそもGUIがない環境でCOMが起動しない」。
これらはすべて、PowerPointのオブジェクトモデルを単なる「マクロ記録」の延長で捉えているから起こる悲劇だ。本稿では、VBAをサーバーサイドのツールとして叩き上げ、過酷なエンタープライズ環境で生き残るための「完全サイレント・バッチ変換基盤」の構築術を伝授する。
—
1. 鬼門を突破する：環境構築の作法
まず、大前提を叩き込む。WindowsのタスクスケジューラでPowerPointを動かす場合、デスクトップセッションが切断されると、PowerPointの描画エンジンがクラッシュする。これを防ぐには、以下の「儀式」が不可欠だ。
1. セッション0の罠: サーバーOS上で実行する場合、ユーザーがログオフしてもプロセスが生き続けるように設定する。
2. フォルダの作成: `C:\Windows\System32\config\systemprofile\Desktop` というフォルダが存在しないと、PowerPointは初期化に失敗する。これは古くからの「バグという名の仕様」だ。
—
2. エンタープライズ品質のPDF変換スクリプト
VBA単体ではエラーハンドリングが脆弱になるため、今回は「VBAを中核としたVBScriptラッパー」による実行を推奨する。これにより、タスクスケジューラからの呼び出しを完全に隠蔽し、エラー発生時にWindowsイベントログへ確実に書き込むことが可能になる。
実装コード（VBScript）
‘ BatchConverter.vbs
‘ 圧倒的な安定性を目指したPowerPoint PDF変換エンジン
Option Explicit
Dim pptApp, pptPres, fso, targetFolder, pdfFolder
Set fso = CreateObject(“Scripting.FileSystemObject”)
targetFolder = “C:\Batch\Input”
pdfFolder = “C:\Batch\Output”
‘ 1. COMオブジェクトの厳密な生成
On Error Resume Next
Set pptApp = CreateObject(“PowerPoint.Application”)
If Err.Number <> 0 Then
WScript.Quit 1
End If
On Error GoTo 0
‘ 2. バックグラウンド実行の鉄則
‘ 警告ダイアログやリンク更新の確認を完全に抑制する
Dim files, file
Set files = fso.GetFolder(targetFolder).Files
For Each file In files
If LCase(fso.GetExtensionName(file.Name)) = “pptx” Then
‘ ReadOnlyで開き、メモリ消費を最小限に抑える
Set pptPres = pptApp.Presentations.Open(file.Path, , , msoFalse)
‘ PDF変換 (ppSaveAsPDF = 32)
‘ サーバーサイドでは余計なオプションを省くのが安定の秘訣
pptPres.SaveAs pdfFolder & “\” & fso.GetBaseName(file.Name) & “.pdf”, 32
‘ 3. オブジェクトの明示的解放（ここが生死を分ける）
pptPres.Close
Set pptPres = Nothing
End If
Next
‘ 4. アプリケーション終了の徹底
pptApp.Quit
Set pptApp = Nothing
—
3. なぜ「死なないプロセス」が作れるのか？
コードを見て気づいたかもしれないが、`msoFalse`（Windowを表示しない）を指定し、`Set = Nothing`でメモリを解放する順序を徹底している。
- ライフサイクル管理: `pptPres.Close` を忘れると、バックグラウンドにゾンビプロセスが蓄積し、翌朝にはサーバーがメモリ不足で悶絶することになる。必ず `Presentation` オブジェクトを解放してから `Application.Quit` を呼ぶこと。
- イベント抑制: `DisplayAlerts = ppAlertsNone` は必須だ。もし変換中にフォント欠落やリンク切れのダイアログが一度でも出れば、タスクスケジューラは永久に待機状態（ハングアップ）となる。
—
4. 伝説のアーキテクトからの助言：保守の極意
このシステムを「作って終わり」にしてはいけない。以下の運用ルールを設けることが、真のプロフェッショナルだ。
- ログの完全追跡: `WScript.Echo` は使わず、`Scripting.FileSystemObject` を使って、実行時刻と処理結果（成功/失敗）をCSVで出力し続けろ。
- プロセスキラーの配置: 万が一のために、タスクスケジューラの終了条件として、実行時間が長すぎる場合に `taskkill /f /im powerpnt.exe` を叩くラッパーを仕込んでおけ。これが「完全無人運用」を支える防波堤となる。
- メモリリークの対策: 大量変換を行う場合は、100ファイル単位でプロセスを再起動（`Quit` して再 `CreateObject`）させるループを組め。PowerPointのCOMは、長時間稼働すると必ずと言っていいほどメモリの断片化を引き起こす。
—
終わりに：自動化は「掃除」である
自動化とは、単に手作業を置き換えることではない。プロセスが残らないように掃除し、メモリを適切に管理し、エラーが起きた時に即座に検知できるようにすることだ。
このコードは、私の現場で数万ページのPPTXを夜な夜なPDF化し続けてきた、いわば「生きた血」だ。諸君の環境でも、このアーキテクチャが荒波を乗り越える一助となることを期待する。
健闘を祈る。
