以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于提取excel报表中的图片问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=180970)
--  作者：ygg8310
--  发布时间：2022/10/20 16:53:00
--  关于提取excel报表中的图片问题
如何判断该单元格内是否有图片文件？
--  作者：有点蓝
--  发布时间：2022/10/20 17:02:00
--  

遍历所有图片，获取图片所在的单元格
……
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
For Each s As MSExcel.Shape In ws.Shapes
    Dim rng As MSExcel.Range = s.TopLeftCell
    MsgBox(rng.Address)
Next
--  作者：ygg8310
--  发布时间：2022/10/20 17:02:00
--  
是这样的我有个图片单元格，但几十个报表图片位置不是固定的求一方法