以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何将报表文件夹下的两个Word文档合并成一个Word文档,并保存在指定目录下,代码该如何写?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=160867)

--  作者:魏福庆
--  发布时间:2021/2/24 13:41:00
--  如何将报表文件夹下的两个Word文档合并成一个Word文档,并保存在指定目录下,代码该如何写?
我用Word报表模板,生成了两种排版样式的报表,这两种格式的报表生成完后如何用代码将这两个格式的Word文件合并成一个文件。向老师请教!
[此贴子已经被作者于2021/2/24 13:55:28编辑过]

--  作者:有点蓝
--  发布时间:2021/2/24 14:33:00
--  
Dim app As New MSWord.Application
try
    Dim fileName = "D:\\1.doc"

    Dim doc2 = app.Documents.Open("D:\\2.doc")
    App.Selection.InsertFile(fileName)
    doc2.save
catch ex As exception
    msgbox(ex.message)
finally
    app.Quit
End try

--  作者:魏福庆
--  发布时间:2021/2/24 15:04:00
--  多谢老师!
后台老师真的强大,就凭老师回答我这么些问题,我打算入手个正版!狐表这个论坛服务是我见过最快,最好的,祝狐表越做越大。