以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]关于foxtable图片问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=113774)
--  作者：81538475
--  发布时间：2018/1/22 21:26:00
--  [求助]关于foxtable图片问题
现在表格上有大量图片信息需要添加的话，一个个存下来在添加效率比较低。请问下，插入图片的时候能不能像excel那样先截图然后直接粘贴进去呢。
--  作者：有点蓝
--  发布时间：2018/1/22 21:28:00
--  
不能
--  作者：有点甜
--  发布时间：2018/1/23 9:15:00
--  

试试截图自己做，如

 

Dim proc As new Process
proc.File = ApplicationPath & "capture.exe"
proc.WaitForClose = True
proc.Start
If ClipBoard.GetImage IsNot Nothing Then
    ClipBoard.GetImage.save("d:\\test.jpg")
    msgbox("保存到了d盘")
    ClipBoard.SetText("d:\\test.jpg")
End If

保存图片之后，直接在单元格填入路径