通过VBA将excel数据导入至word文档

我的第二篇CSDN文章开始使用markdown写作。学了markdown很久，但是一直采用word或者印象笔记做记录或者写文章，一直也没能实践，自然也谈不上多熟悉。就从这一篇文章开始吧。

这段程序的想法是来自于昨天去人事科续签劳动合同，人事科的同事笨拙的把我的个人信息从一个excel文档中拷到劳动合同word文档中，然后打印。不仅是纯手工，而且连剪切板增强软件也没用。我就看着她反复粘贴，花费了好几分钟时间。想想上千号人的单位，得花多少时间在这上面呢？于是萌生了写下这个小程序的想法，回来了就动手。

这是采用VBA写的一个宏。既然是office，那么自然是原生的VBA支持最好。因为之前没学过关于word的VBA语法，还专门找了资料，花了一个小时大概浏览了一遍。然后开始编码。

思路

• 选择excel的某一行，然后运行宏
• 宏自动将该行的职工信息，如姓名，年龄等信息保存至临时变量
• 复制模板，新建一个用该职工股姓名命名的doc文件
• 打开doc，将数据传入doc文件，最后保存关闭

废话多不说，直接贴代码

这里有一个值得注意的点：我的数据是先插入右边位置，再插入左边位置。原因是，先插入左边的话，右边的字符距离就会改变，再插入就会出错；而先右后左则不会有这个问题。

不过我还是没有把这个代码给人事科，哈哈，他们也不知道居然有这么简捷的办法。实际这个代码技术水平很低，但是没办法，官僚机构，也怕显摆了，看看以后他们是否有需要吧。