请教模板生成及内容替换的VBA问题

癸亥子

实现的功能是点击按钮根据模板自动生成word文档

1、模板：用的是\XXX.doc这样的路径，我想把他换成“\模板目录\总经理任职书模板.docx”这样的，就是把模板统一放在模板目录这个文件夹下面；
2、在生成目录下生成带有公司名字的文件夹：假如公司名字是微软(工作表B3内容，如果B3无内容则选择B2)，点击生成后word存放在“\生成目录\微软\“这个文件夹下；生成的word文档由”总经理任职书模板.docx“修改为”总经理任职书.docx“(就是模板两字不要了)；

3、替换内容：请看工作表【自定义函数】里的说明，替换的内容在【信息卡】这个工作表上。模板在模板目录下。
需要说明的是请问能不能写成2个条件，比如说，公司名称Company_Name
1）、第一种是指定某个单元格替换Company_Name
2）、第二种就是，先检索B3的内容，如果有就用B3的内容，B3如果没内容就用B2的内容。
(两个条件不是一起用，不同的文档用不同的条件，我怕我又跑上来问)

4、生成完弹出对话框"总经理任职书生成完毕"


请忽略我宏里面的内容，我琢磨了半天

先谢谢各位的帮助

skyzxh

批量 是体现在哪里？。。。。。。。。。。。。。。。。。。。。。

癸亥子

skyzxh 发表于 2019-3-16 10:32
批量 是体现在哪里？。。。。。。。。。。。。。。。。。。。。。

因为一个公司会根据该公司不同信息生成不同的文档，比如说总经理任职，监事任职，股东等，我现在只做了个总经理任职的模板，后期别的我自己琢磨一个一个弄

skyzxh

如果每个职务的任职模板是不同的话，那就分别做好，让程序识别是什么职务，分别调用相应的模板即可

癸亥子

skyzxh 发表于 2019-3-16 15:40
如果每个职务的任职模板是不同的话，那就分别做好，让程序识别是什么职务，分别调用相应的模板即可

关键第3条不会...

癸亥子

.................................................................