之前在小桥流水看到有人问怎样在Excel批量导入图片,随手写了个宏,没想到今天又有人问我,中午把VBA小改一下
图片用1.jpg 2.jpg 3.jpg ... 10.jpg 12.jpg依次命名
图片间隔是2张相邻图片左上角的间隔,例如图片尺寸100像素,间隔写100就刚好紧挨着
默认开始位置是以选择框所在位置,例如下图,选择框在B2,图片就从B2开始排列了

演示下载,解压到D盘就可以直接执行了,如果打开弹出提示窗口,是因为你Excel安全性设置高,没事,一样可以执行
VBA代码如下
之前在小桥流水看到有人问怎样在Excel批量导入图片,随手写了个宏,没想到今天又有人问我,中午把VBA小改一下
图片用1.jpg 2.jpg 3.jpg ... 10.jpg 12.jpg依次命名
图片间隔是2张相邻图片左上角的间隔,例如图片尺寸100像素,间隔写100就刚好紧挨着
默认开始位置是以选择框所在位置,例如下图,选择框在B2,图片就从B2开始排列了

演示下载,解压到D盘就可以直接执行了,如果打开弹出提示窗口,是因为你Excel安全性设置高,没事,一样可以执行
VBA代码如下
EXCEL批量导入图片 (2007-2-26 14:15:28)
将整个数据库进行简繁体互转的VBS (2006-11-2 3:26:32)
计算某天是当月第几周 (2006-4-28 17:20:53)
网易手机壁纸小偷程序 (2006-3-9 23:6:55)
0768114.net网址大全爬行脚本 (2006-2-25 2:49:58)
无聊之下爬行了小飞的网址大全 (2006-2-24 1:37:14)
C.A.T. 于 2008-1-28 13:58:54 回复
C.A.T. 于 2008-1-28 13:59:11 回复
C.A.T. 于 2007-10-29 14:13:45 回复可以实现,细看上面程序注释,图片尺寸不一致的话最好再外面处理好再导入
C.A.T. 于 2007-9-18 17:08:57 回复当然试过,莫非你认为上面的截图是我自己PS上去的?
既然有启发了就量体裁衣吧
◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。