以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  excel报表文件 模板里有个图片 图片有超链接 生成报表后 链接的地址前多了个# 提示无效应用 求办法  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=58428)

--  作者:lv1692
--  发布时间:2014/10/16 15:30:00
--  excel报表文件 模板里有个图片 图片有超链接 生成报表后 链接的地址前多了个# 提示无效应用 求办法
excel报表文件 模板里有个图片 图片有超链接  生成报表后 链接的地址前多了个# 提示无效应用 求办法
--  作者:狐狸爸爸
--  发布时间:2014/10/16 15:31:00
--  
模版不能有超链接
--  作者:lv1692
--  发布时间:2014/10/16 15:38:00
--  
那能读取生成的报表文件里的图片吗? 我代码里面把超链接给补上去
--  作者:有点甜
--  发布时间:2014/10/16 15:46:00
--  

 你可以用vba操作生成的excel http://www.foxtable.com/help/topics/2121.htm

 


--  作者:lv1692
--  发布时间:2014/10/16 16:03:00
--  
找不到 VBA操作 单元格中的图片的代码呀
--  作者:有点甜
--  发布时间:2014/10/16 16:08:00
--  
 做例子发上来
--  作者:lv1692
--  发布时间:2014/10/16 16:12:00
--  
就是模板生成的图片里面加上超链接
--  作者:有点甜
--  发布时间:2014/10/16 17:00:00
--  
Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\\1.xls")
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
App.DisplayAlerts = False \'加上此行可禁止弹出合并前的提示
ws.Hyperlinks.Add(Anchor:=ws.Shapes.item("Picture 1"), Address:="C:\\出库单.xls")
wb.Save
app.quit

--  作者:lv1692
--  发布时间:2014/10/17 13:39:00
--  
感谢版主! 请问像ws的方法我从哪里可以查到,谢谢!
--  作者:有点甜
--  发布时间:2014/10/17 14:08:00
--  

  参考文档 http://msdn.microsoft.com/zh-cn/library/Microsoft.Office.Interop.Excel%28v=office.11%29.aspx