'docx转pdf、doc、rtf、txt
Option Explicit
Sub docx2other()
On Error Resume Next
Dim sEveryFile As String,sSourcePath As String,sNewSavePath As String
Dim CurDoc As Object
sSourcePath = "E:\DOCX文件\"
'假定待转换的docx文件全部在"E:\DOCX文件\"下，你需要按实际情况修改。
sEveryFile = Dir(sSourcePath &"*.docx")
Do While sEveryFile <> ""
Set CurDoc = Documents.Open(sSourcePath & sEveryFile, , , , , , , , , , , msoFalse)
sNewSavePath = VBA.Strings.Replace(sSourcePath & sEveryFile, ".docx", ".pdf")
'如果想导出doc/rtf/txt等，就把上一行行
2022-11-05 07:43:34
1011B
1
java 代码替换docx文档中的指定文字（文章主题，时间等），生成新的docx文档，再把文档转换成pdf。目的是在pdf中签名使用。不好意思需要点分。亲测可以用(本人不喜骗分)
2021-07-29 19:17:27
27.98MB
1
文档中，包含说明文档、lib架包以及工具类的代码。说明文档中，包含了工程依赖（maven）、或者jar包依赖、测试代码、linux字体安装、tomcat内存增加等一系列采坑说明。包你拿到手，立马就能实现docx转word功能。工具类的代码，已经排出了测试代码的各种坑，可以实现文字替换、表格替换等系列功能。
2021-04-10 19:17:30
37.80MB
1