|
いつもお世話になっております。
現在CS3(WIN/XP)環境でパンフレットを制作しているのですが、パンフレットの数が多いため、PDFに変換する作業を自動でできないものかと悩んでおります。
イメージとしてはフォトショップ等のドロップレットの様なものを作れないかと思っているのですが、何か方法はあるのでしょうか? (欲を言うのであれば出力まで自動処理ができれば完璧なんですが。。。)
よろしくお願いいたします。
|
No.2174 2009/01/13(Tue) 15:27:28
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 2.0.50727)
|
Re: 自動でPDFに変換 / お〜まち |
|
|
|
Windows Script Host を利用すると、InDesignドキュメントファイルをドラッグ&ドロップすることで、そのファイルに対して色々な自動処理をかけることができます。 以下、ドロップされたファイルと同じ階層にPDFファイルを作成するVBScriptの例です。
'--サンプルここから 'ドラッグ&ドロップでPDF出力 - InDesign CS3 用 Set objArgs = WScript.Arguments If objArgs.Count = 0 Then WScript.Echo "入力ファイル名がありません" WScript.Quit End If
Set app = CreateObject("InDesign.Application.CS3_J") app.ScriptPreferences.UserInteractionLevel = 1699640946 '次の行の[プレス品質]の所にPDF書き出しプリセット名を記入 Set myPDFPreset = app.PDFExportPresets("[プレス品質]")
For i = 0 To objArgs.Count - 1 filename = objArgs(k) PDFfilename = Left(filename, InStrRev(filename, ".")) & "pdf" '保存先ファイル名 Set doc = app.Open(filename, False) doc.Export 1952403524, PDFfilename, False, myPDFPreset doc.Close Next app.ScriptPreferences.UserInteractionLevel = 1699311169 '--サンプルここまで
この記述をテキストエディタに貼りつけて、ファイルに保存(拡張子.vbs)すればドロップレットのできあがりです。
|
No.2177 2009/01/13(Tue) 18:28:46
Opera/9.63 (Windows NT 6.0; U; ja) Presto/2.1.1
|
|
Re: 自動でPDFに変換 / 旅人 |
|
|
No.2183 2009/01/15(Thu) 10:47:01
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322)
|
|