我可以使用VBA将图像(GIF)从Web导入Excel吗?

Exc*_*lll 3 excel vba excel-vba

我有一个Excel表格中的.gif文件的URL列表.我想使用VBA查询这些网站并将这些图像插入到同一工作表中.我正在使用Excel 2007.

我尝试使用"获取外部数据 - 从Web"功能查询网站,但它返回了以下错误:

"无法打开http://.../blah.GIF.Internet站点无法返回您请求的对象.(HTTP/1.0 403)"

这是因为Excel无法使用此功能导入在线图像吗?或者这个问题是否与网站有关?

最重要的是,还有其他方法可以在VBA中完成吗?

mis*_*ab1 9

是的,你可以这样做.实际上很容易.Excel具有AddPicture功能.从Excel VBA帮助:

表达.AddPicture(Filename,LinkToFile,SaveWithDocument,Left,Top,Width,Height)

使用这样:

Sheets(1).Shapes.AddPicture "http://www.mywebsite.com/images/map.gif" _
                          , msoFalse, msoTrue, 100, 100, 500, 600
Run Code Online (Sandbox Code Playgroud)

左,顶部,宽度和高度都是必需的并且是分数.