Foxtable(狐表)用户栏目专家坐堂 → 关于当前表格打印


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

主题:关于当前表格打印

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


加好友 发短信
等级:幼狐 帖子:158 积分:1325 威望:0 精华:0 注册:2019/12/29 16:20:00
关于当前表格打印  发帖心情 Post By:2022/5/17 16:01:00 [显示全部帖子]

请教老师,在窗口上添加一个按钮,打印当前Excel表格,如何写代码?谢谢老师

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


加好友 发短信
等级:幼狐 帖子:158 积分:1325 威望:0 精华:0 注册:2019/12/29 16:20:00
  发帖心情 Post By:2022/5/17 16:21:00 [显示全部帖子]

收到,谢谢蓝老师

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


加好友 发短信
等级:幼狐 帖子:158 积分:1325 威望:0 精华:0 注册:2019/12/29 16:20:00
  发帖心情 Post By:2022/5/18 10:16:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:pfkdj253fwbe86un9xc~`35.png
图片点击可在新窗口打开查看


Dim Book As New XLS.Book(ProjectPath & "Attachments\专家查询.xls")
Dim fl As String = ProjectPath & "Reports\专家查询.xls"
Book.Build() 
Book.Save(fl) 
Dim Proc As New Process 
Proc.File = fl
Proc.Start()

蓝老师,我用上面的代码,执行下来却是上面图片的效果,请问该如何改进?谢谢蓝老师

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


加好友 发短信
等级:幼狐 帖子:158 积分:1325 威望:0 精华:0 注册:2019/12/29 16:20:00
  发帖心情 Post By:2022/5/19 8:58:00 [显示全部帖子]

蓝老师,表格格式不对,执行下来不是标准的Excel表

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:专家查询表.xls


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


加好友 发短信
等级:幼狐 帖子:158 积分:1325 威望:0 精华:0 注册:2019/12/29 16:20:00
  发帖心情 Post By:2022/5/19 9:16:00 [显示全部帖子]

谢谢蓝老师,刚才改了一下,又可以了

 回到顶部