电子表格插图片根据姓名自动插入图片的VBA代码

来源：蜘蛛抓取(WebSpider) 时间：2018-06-25 04:44 标签： 电子表格插图片
不明白这句的意思也不明白结果的效果
如果有多个图片，不妨先处理决3个图片手工给出结果的效果，上传 ...

我的意思其实就是如果用代码插入图片的话保存后只是存了個链接 图片换位置就找不到了
我就是想用代码搞进来的图片不要与我的原图有链接关系 可以保存在文件里
原理就是先插入图片算出他的高寬比 然后再删除 再用Shapes.AddPicture方法把图片整进来 这样也不用担心图片大了文件就大 自然压缩了
可就是速度相当地慢啊!

每次循环你都执行了2次插入圖片和1次删除图片。应该1次插入图片就行了吧


没有附件 随便新建个 然后弄些照片就行了
我记得有办法直接读取图片的长宽像素信息的 但昰不知道是什么代码
我这个笨办法 效率很低 很慢 十多张图就要一两秒钟
ActiveSheet.Shapes.AddPicture 我还发现一个问题，每次打开文档时都会自动更新一次图片，弄嘚打开文件好慢

感谢 朱荣兴 的回复！


不过好像鈈是我想要的，“基本信息录入”d5-d11录入“人员库”的我已经做成了，
现在是要把另一张表（本次合同信息）里出现的人对应的一行的數据，自动写入“人员库”的对应人员的 I列-L列；且之后再在“基本信息录入”表里查询时I列-L列的内容也能在“基本信息录入”表对应着讀出来

“基本信息录入”表里的『保存当前人员信息到人员库』和『查询』按钮的VB已经写在里面了

朱老师，有空请再帮着看看谢谢






留.全知全能 无所不知,无所不能.

你對这个回答的评价是

我要回帖

更多关于 电子表格插图片 的文章

 

随机推荐