Foxtable(狐表)用户栏目专家坐堂 → EXCEL报表转为HTM问题


  共有2473人关注过本帖树形打印复制链接

主题:EXCEL报表转为HTM问题

帅哥哟,离线,有人找我吗?
95383
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:13 积分:199 威望:0 精华:0 注册:2015/4/27 13:59:00
EXCEL报表转为HTM问题  发帖心情 Post By:2015/5/31 21:42:00 [只看该作者]

1.已通过EXCEL模板设计模块设计并生成了EXCEL报表。
2.设计了一个webbrowser窗口用于显示excel报表,感觉慢且不美观。
3.现想在此基础上改为HTM格式显示。如何编写语句?

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/5/31 21:47:00 [只看该作者]

 把生成的excel文件转成html即可。

 

 

Dim App As New MSExcel.Application
app.DisplayAlerts = False
Dim Wb As MSExcel.Workbook = App.WorkBooks.Open("d:\test.xls")
Wb.SaveAs(Filename:=ProjectPath & "Reports\基层法律服务所名册.htm", FileFormat:=MSExcel.XlFileFormat.xlHtml)
wb.close
app.quit
 

 回到顶部
帅哥哟,离线,有人找我吗?
95383
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:13 积分:199 威望:0 精华:0 注册:2015/4/27 13:59:00
  发帖心情 Post By:2015/5/31 22:22:00 [只看该作者]

搞定,谢谢大红袍的神速支持。

 回到顶部