图像控制的“ loadpicture”指令中找不到文件

Question

我正在编码一个按钮，以便在Excel工作表的vba图像控件中添加图片。 但出现消息“找不到文件”

首先我尝试了这个：

Set mydocument = Worksheets(1)
mydocument.Shapes.AddPicture _
    "D:\Afshar\programming\PIAGGIO\liberty 150", _
    True, True, 100, 100, 70, 70

错误为：“应用程序定义的错误或对象定义的错误”

然后我尝试：

Dim WS As Worksheet
Dim path As String

path = "D:\Afshar\programming\PIAGGIO\liberty 150"

Set WS = Sheets(1)

With WS
.OLEObjects("Image1").Object.Picture = 
LoadPicture("D:\Afshar\programming\PIAGGIO\LIBERTY S 50")

End With

错误：未找到文件”