批量插入指定单元格图片
前两天小编给一网友做了一个图片批量导入的程序，下面截取其中的一个小功能为大家讲解一下，这个小程序用了VBA代码的方法，其中有些知识在本平台的Excel VBA系列知识中还没有讲到，不过还是提前放出来把，大家自行参考学习。这个小程序个人认为非常实用，希望大家能够体会到其中的原理，方便日后自己使用。如下表，是一份员工资料表，其他信息已经填写齐全：
（注意：原表中红色线是文档的边缘）现在只剩下各个员工对应的照片了，首先仔细看一下这个表，很明显已经事先做好了整个文档的结构，每个员工行的行高和列宽都是一样的，面对这么有规律的数据格式，那必然要考虑批量完成了，手动单插的方式效率太慢，我不说你也懂！小编写了如下一段代码：
代码要点：
Shapes.AddPicture：向文档的指定位置插入指定名称的图片，通过精确的参数设置，从而比较准确地完成照片的批量导入。它的语法格式为：表达式.AddPicture(Filename, LinkToFile, SaveWithDocument, Left, Top, Width, Height)。
表达式为一个代表 Shapes 对象的变量，他参数的含义如下表：
所以这个程序的关键就是Shapes.AddPicture最后面的四个参数，它们决定要插入图片的位置，它们的解释已经在代码中用绿色字体予以说明，我们来看下效果吧：
以后朋友们遇到这样的需求，可以以这个代码为基准，稍微调整一下最后面的那4个参数就可以啦，举一反三很容易~
赞 (0)