分享

批量插入指定单元格图片

 计算机办公 2021-08-27


前两天小编给一网友做了一个图片批量导入的程序,下面截取其中的一个小功能为大家讲解一下,这个小程序用了VBA代码的方法,其中有些知识在本平台的Excel VBA系列知识中还没有讲到,不过还是提前放出来把,大家自行参考学习。这个小程序个人认为非常实用,希望大家能够体会到其中的原理,方便日后自己使用。如下表,是一份员工资料表,其他信息已经填写齐全:

(注意:原表中红色线是文档的边缘)现在只剩下各个员工对应的照片了,首先仔细看一下这个表,很明显已经事先做好了整个文档的结构,每个员工行的行高和列宽都是一样的,面对这么有规律的数据格式,那必然要考虑批量完成了,手动单插的方式效率太慢,我不说你也懂!小编写了如下一段代码: 

代码要点:

Shapes.AddPicture:向文档的指定位置插入指定名称的图片,通过精确的参数设置,从而比较准确地完成照片的批量导入。它的语法格式为:表达式.AddPicture(Filename, LinkToFile, SaveWithDocument, Left, Top, Width, Height)。

表达式为一个代表 Shapes 对象的变量,他参数的含义如下表:

所以这个程序的关键就是Shapes.AddPicture最后面的四个参数,它们决定要插入图片的位置,它们的解释已经在代码中用绿色字体予以说明,我们来看下效果吧:


以后朋友们遇到这样的需求,可以以这个代码为基准,稍微调整一下最后面的那4个参数就可以啦,举一反三很容易~

快捷查看

    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多