您的位置:首页 > 编程语言 > VB

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

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

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

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

思路

选择excel的某一行,然后运行宏

宏自动将该行的职工信息,如姓名,年龄等信息保存至临时变量

复制模板,新建一个用该职工股姓名命名的doc文件

打开doc,将数据传入doc文件,最后保存关闭

废话多不说,直接贴代码



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

不过我还是没有把这个代码给人事科,哈哈,他们也不知道居然有这么简捷的办法。实际这个代码技术水平很低,但是没办法,官僚机构,也怕显摆了,看看以后他们是否有需要吧。
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签:  VBA office excel word