以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]用VBA语句如何往一个Excel文件单元格插入图片?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=149234)

--  作者:新福星
--  发布时间:2020/4/27 7:37:00
--  [求助]用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语句如何把一个图片插入到指定的单元格呢? 谢谢!


[此贴子已经被作者于2020/4/27 7:38:31编辑过]

--  作者:有点蓝
--  发布时间:2020/4/27 8:51:00
--