用vb文本框的内容替换word的指定的文字
我用以上的代码用vb文本框的内容替换了word文档上指定的文字，但是我已准备的文档（模板）也改变了，我想原本（模板）也留下，替换以后打开新的word文档然后另存为，帮助一...
我用以上的代码用vb 文本框的内容替换了word文档上指定的文字，但是我已准备的文档（模板）也改变了，我想原本（模板）也留下，替换以后打开新的word文档然后另存为，帮助一下。
展开
1个回答
展开全部
打开前，先把 模板文件复制一份为临时文件名。然后打开这个文件，然后输出内容。最后再改名为 最终的文件名
参考：
Const TMPFILE = "~tmp.doc"
If Dir(App.Path & "\" & TMPFILE) <> "" Then
Kill TMPFILE
End If
FileCopy App.Path & "\" & 模板文件, App.Path & "\" & TMPFILE '目标位置可以是任意盘符任意目录，要求目录存在
'对 TMPFILE 打开和处理
Name App.Path & "\" & TMPFILE As "输出报告1.doc"
更多追问追答
追问
源码有没有
以上代码 可以copy原文档但是我想不是那样。例子：我设计一个合同系统准备一个合同模板word文档vb文本框的内容替换word制定的内容并另存为，始终不要改原模板。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
