☰

使用 Microsoft Office 批量将 PDF 转换为 DOCX

tag-icon • tag-icon windows-10 microsoft-word pdf batch docx
使用 Microsoft Office 批量将 PDF 转换为 DOCX

我确实喜欢 word 将 pdf 转换为 docx 格式的方式。布局几乎完美无缺（表格/页脚/页眉等）。我尝试了很多工具，但 Microsoft Word 做得非常好。

有没有办法用 word 将大量 pdf 批量转换为 docx 格式？使用命令行实用程序或其他方法？

答案1

您可以参考下面的vba代码：

Option Explicit
Sub other2docx()
On Error Resume Next
Dim sEveryFile As String,sSourcePath As String,sNewSavePath As String
Dim CurDoc As Object
sSourcePath = "E:\file location\"
sEveryFile = Dir(sSourcePath &"*.pdf")
Do While sEveryFile <> ""
   Set CurDoc = Documents.Open(sSourcePath & sEveryFile, , , , , , , , , , , msoFalse)
   CurDoc.Convert 
   sNewSavePath = VBA.Strings.Replace(sSourcePath & sEveryFile, ".pdf", ".docx")
   CurDoc.SaveAs2 sNewSavePath, wdFormatDocumentDefault
   CurDoc.Close SaveChanges:=False
   sEveryFile = Dir
Loop
Set CurDoc = Nothing

pdf转docx很容易报错，有时候还会让word卡住，只能用任务管理器结束word了。注意是哪个PDF文件导致卡住的，然后将这个PDF文件移到其他文件夹，不要再让Word转换这个文件了。

相关内容