插入图片到Excel VBA，方法图片失败

试图制作一个macros在Excel中逐步插入3个图像

一张工作表（图片）包含列1-3行中图像的URL

另一个工作表（输出）应该水平输出图像。

Sub testinsertpix() Dim i As Integer Dim link As String For i = 1 To 3 link = Worksheets("pics").Cells(i, "A").Value Cells(1, i).Select ActiveSheet.Pictures.Insert (link) Next i End Sub 

它会插入第一张图片，但当循环到达第二张图片时会失败。

“图片类的插入方法失败”

请帮忙吗？

Answer 1

尝试：

 Dim link as Variant 

然后输出值，看看哪里出错了。 我最好的猜测是你的URL没有按照你所期望的方式被阅读。