主题：[求助]用VBA语句如何往一个Excel文件单元格插入图片？

帮助中介绍了往一个Excel文件指定单元格内插入图片的方法：

Sheet(10,2).Value = New XLS.Picture(GetImage("c:\Foxtable.Ico"))

那么在VBA下用下列语句就出错了？

Dim App As New MSExcel.Application
Dim Wb As MSExcel.Workbook = App.WorkBooks.Open(File_Name)
Dim Ws As MSExcel.WorkSheet
Dim Rg As MSExcel.Range

  Dim zpwj As String=ProjectPath & "Attachments\a6.png"

   Rg = Ws.Cells(8,1)
   Rg.Value = New XLS.Picture(GetImage(zpwj),8,15,650,600)

用VBA语句如何把一个图片插入到指定的单元格呢？ 谢谢！