用这代码在自己电脑插入图片，可在别人电脑就显示无法链接图片，求解

奈何桥的輪茴 · 发表于 2015-7-24 13:58

ili 发表于 2015-7-24 10:14
附件没有，大小位置随便。只能这样了，

亲，帮忙解决下，{:soso_e183:}

奈何桥的輪茴 · 发表于 2015-7-24 16:10

ili 发表于 2015-7-24 09:41
别用pictures 插入图片了。换下面这种方式插入图片可以随文档保存。

activesheet.shapes.addpicture ...

亲，我已经将附件上传了，帮忙解决下

ili · 发表于 2015-7-24 16:44

奈何桥的輪茴发表于 2015-7-24 11:48
附件里帮忙弄下，要可以保存的

A列输入，B列自动导入图片。

插入图1.rar (24.46 KB, 下载次数: 240)

奈何桥的輪茴 · 发表于 2015-7-24 17:35

ili 发表于 2015-7-24 16:44
A列输入，B列自动导入图片。

可以了，谢谢，再帮一个忙，我想要应用到其他表格，需要怎么弄？就是不用每次都是把数据复制到这个表格？

ili · 发表于 2015-7-24 17:37

奈何桥的輪茴发表于 2015-7-24 17:35
可以了，谢谢，再帮一个忙，我想要应用到其他表格，需要怎么弄？就是不用每次都是把数据复制到这个表格？

Set Rng = Intersect(Target, Columns("A"))
红字部分改为你需要起作用的列。其他不变，复制到对应的工作表模块。

高大强123 · 发表于 2015-7-25 13:55

好帖！谢了！

奈何桥的輪茴 · 发表于 2015-7-27 09:23

ili 发表于 2015-7-24 17:37
Set Rng = Intersect(Target, Columns("A"))
红字部分改为你需要起作用的列。其他不变，复制到对 ...

亲，很好用，谢谢，再帮忙解决个问题，如果一个表格里面有好几个页面，我要每个页面都插入图片，有没有可能共用一个模板，然后弄一个按钮，按钮移动到哪个页面就点下，图片就自动出来的？

ili · 发表于 2015-7-27 10:29

奈何桥的輪茴发表于 2015-7-27 09:23
亲，很好用，谢谢，再帮忙解决个问题，如果一个表格里面有好几个页面，我要每个页面都插入图片，有没有可 ...

不用自动的？
每个表都是A列序号，B列图片？

奈何桥的輪茴 · 发表于 2015-7-27 10:49

ili 发表于 2015-7-27 10:29
不用自动的？
每个表都是A列序号，B列图片？

亲，我现在就是表格里的三个表格都要插入图片，需要怎么做？

ili · 发表于 2015-7-27 11:08

奈何桥的輪茴发表于 2015-7-27 10:49
亲，我现在就是表格里的三个表格都要插入图片，需要怎么做？

你还没回答我。这些表格是不是都是 A列序号，B列图片？
要自动显示还是手动显示？

		自动登录	找回密码
密码			免费注册

[求助] 用这代码在自己电脑插入图片，可在别人电脑就显示无法链接图片，求解