仪器社区

谁能告诉我Excel里面如何批量加载网络图片？

超神2不解释 2013-03-19

就是我想一列里面，只要是超链接的网络图片，想让它自动转化为图片格式显示在cell里！求指导！谢谢！可以用宏来实现，谁能给我一个代码案例呢？... 就是我想一列里面，只要是超链接的网络图片，想让它自动转化为图片格式显示在cell里！求指导！谢谢！可以用宏来实现，谁能给我一个代码案例呢？

全部评论

t2studio

试试：

Sub test()
On Error Resume Next

For i = 1 To 10
pic = Cells(i， 1).Hyperlinks(1).Address
If pic <> "" Then
Cells(i， 2).Select
ActiveSheet.Pictures.Insert (pic)
pic = ""
End If

Next
End Sub

这个程序把A1：A10有效的超链接图片插入到B1：B10

16 0 2013-03-20 0条评论回复

您可能感兴趣的社区主题

加载中...