word 批量转 pdf |
您所在的位置：网站首页 › word转pdf批量转换 › word 批量转 pdf |
word 批量转 pdf
|
使用的软件： word + excel + 虚拟打印机 虚拟打印机doPDF : 链接：https://pan.baidu.com/s/1QEPpRx3qglztELL2QI2R6w 提取码：ow6h word 批量转 pdf 步骤： 1.打开excel--开发工具--Visual Basic
2.将如下脚本贴到上面的红色框中 Sub 批量打印WORD文档() Dim fileToOpen, GetOpenFilename, App, iFile fileToOpen = Application.GetOpenFilename(filefilter:="Word文档(*.do*),*.do*", FilterIndex:=4, Title:="请选择要处理的文档(可多选)", MultiSelect:=True) If Not IsArray(fileToOpen) Then MsgBox "你没有选择文件", vbOKOnly, "提示": Exit Sub Else Set App = CreateObject("Word.Application") For Each iFile In fileToOpen Set WrdDoc = App.Documents.Open(iFile) App.Documents(WrdDoc).PrintOut App.Documents(WrdDoc).Close False T = T + 1 Next End If MsgBox "操作完成！！" & vbCrLf & "打印了 " & T & " 个文件。", vbOKOnly, "提示" End Sub
3.点击绿色按钮运行代码。
4.选择要转换为pdf的所有word文件
|
【本文地址】
今日新闻 |
推荐新闻 |