
私は多くのDOCXファイル(Office 365)をPDFに変換する必要があります。それらを1つずつ開いてPDFにエクスポートすることはできますが、バッチファイルで実行できるより高速なソリューションを探しています。ほぼ機能する1つのオプションは、説明されているようにLibreOfficeを使用することです。ここ単純な docx ファイルでは機能しますが、より複雑なファイル (画像や rtl テキストを含むファイルなど) では、ファイルのレイアウトが乱れます。MS Word でも同じ方法はありますか?
答え1
Microsoft Word がインストールされている場合は、docx2pdf
コマンド ライン ユーティリティを使用して、Windows または MacOS で docx を pdf に一括変換できます。https://github.com/AlJohri/docx2pdf
インストール:
pip install docx2pdf
走る:
docx2pdf myfolder/
免責事項: 私は、フォーマットの問題を一切伴わずに docx を pdf に一括変換するクロスプラットフォーム ソリューションを見つけるのに苦労した後、このツールを作成しました。
答え2
がある
フリーウェアファイルコンバータ、
そして、doc2pdf.vbsスクリプトの読み取り専用修正版は、ウィンヘルプオンライン:
'Convert .doc or .docx to .pdf files via Send To menu
Set fso = CreateObject("Scripting.FileSystemObject")
For i= 0 To WScript.Arguments.Count -1
docPath = WScript.Arguments(i)
docPath = fso.GetAbsolutePathName(docPath)
If LCase(Right(docPath, 4)) = ".doc" Or LCase(Right(docPath, 5)) = ".docx" Then
Set objWord = CreateObject("Word.Application")
pdfPath = fso.GetParentFolderName(docPath) & "\" & _
fso.GetBaseName(docpath) & ".pdf"
objWord.Visible = False
Set objDoc = objWord.documents.open(docPath,,True)
objDoc.saveas pdfPath, 17
objDoc.Close wdDoNotSaveChanges
objWord.Quit
End If
Next
Windows の SendTo フォルダーに追加することもできます。
ファイル エクスプローラーを開き、次の SendTo フォルダーを参照します。
C:\Users%ユーザー名%\AppData\Roaming\Microsoft\Windows\SendTo
スクリプトへのショートカットを作成するdoc2pdf.vbsSendTo フォルダー内。
ショートカットターゲットにプレフィックスを付けるwscript.exeスペースが続きます。
ショートカットに適切な名前を付けます。例:Word文書をPDFに変換する Word文書をPDFに一括変換する
PDF に変換する Word 文書が含まれているフォルダーを開きます。
ドキュメントを選択し、選択したものを右クリックして、に送る。
クリックWord文書をPDFに変換するの中にに送るメニュー。Word文書をPDFにバッチ変換するこれで完了です。PDFファイルが準備できました。Word文書をPDFにバッチ変換する