vba - 从 URL 插入图片

Question

以下代码适用于大多数图像 URL，但对于这个特定的 URL，我收到错误:

Sub test()
Sheets(1).Shapes.AddPicture "https://images-na.ssl-images-amazon.com/images/M/MV5BYzVlY2JiODctNGMzNC00OWE5LTg3MTEtNDQ3NDYxNjIxNTBiXkEyXkFqcGdeQXVyNTM3MDMyMDQ@._V1_.jpg" _
                          , msoFalse, msoTrue, 100, 100, 500, 600
End Sub

Run-time error '1004': The specified file wasn't found

是不是这个特定的 URL 字符串的指定方式(与 VBA 不兼容)引起的？还是您认为它与主机阻止访问有关？谢谢。

Answer 1

尝试寻找*.png 图片。然后就可以了。

我在 PNG 的同一个亚马逊网站上试过一个 -

Sub Test()

     Sheets(1).Shapes.AddPicture _
                 "https://images-na.ssl-images-amazon.com/images/I/31TN1u5GEqL.png",  _
                 msoFalse, msoTrue, 100, 100, 500, 600
End Sub

在MSDN他们给出了 *.bmp 文件的例子。

编辑:但是，*.jpg 可以从许多其他网站使用。因此可能亚马逊正在限制它。