image - 如何在 excel 表中显示来自 url 的图像（2003）

Question

如何编写一个宏来显示来自 url 的图像，我在 excel 2003 的一个单元格中。

任何人都可以帮忙。

提前致谢。

Answer 1

最近有一个关于此的问题，它还询问了重新调整大小以适应单元格的问题。

https://stackoverflow.com/a/15589423/1467082

以下是您需要开始的 4 行代码：

Sub InsertPicFromURL()

Dim pic As String 'file path of pic
Dim myPicture As Picture 'embedded pic

pic = "http://www.gravatar.com/avatar/4d3ac4ebeddcf958a7b8d3e73c2c6805?s=128&d=identicon&r=PG"
Set myPicture = ActiveSheet.Pictures.Insert(pic)

End Sub