Foxtable(狐表)用户栏目专家坐堂 → 怎么将生成打印预览由excel 改为wps


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

主题:怎么将生成打印预览由excel 改为wps

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


加好友 发短信
等级:小狐 帖子:360 积分:3422 威望:0 精华:0 注册:2016/5/25 21:31:00
怎么将生成打印预览由excel 改为wps  发帖心情 Post By:2018/11/14 22:51:00 [只看该作者]

由于内网各终端excel版本不一,有些能生成,有些又不下,但都统一装了wps,以下代码怎么改好
Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open(fl)
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
App.Visible = True
Ws.PrintPreview
Wb.Close
App.Quit


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/11/14 23:00:00 [只看该作者]

执行1楼的代码,报什么错?

 

代码没办法改的,如果xls文件打不开,你excel报表不是也是无法生成的?

 

如果要foxtable调用wps,参考

 

https://www.baidu.com/baidu?wd=c%23+%E5%BC%95%E7%94%A8wps

 


 回到顶部