| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 打印Excel报表按钮的语句 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=123711) |
| -- 作者：18631154510 -- 发布时间：2018/8/21 17:02:00 -- 打印Excel报表按钮的语句 请问窗口按钮打印Excel报表的语句怎么写？
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.Verb = "Print" Proc.Start()
请帮着指正一下错误 [此贴子已经被作者于2018/8/21 17:09:09编辑过]
|
| -- 作者：有点蓝 -- 发布时间：2018/8/21 17:12:00 -- 代码有什么问题？执行有什么错误？ |
| -- 作者：18631154510 -- 发布时间：2018/8/21 17:14:00 -- 打开储存文件失败 |
| -- 作者：有点蓝 -- 发布时间：2018/8/21 17:17:00 -- 1、项目的Attachments目录里有“日报表.xls”这个文件吗？ 2、关闭所有打开的execl，关闭任务管理器里所有的execl进程，再测试
|
| -- 作者：hbfnmxb -- 发布时间：2021/2/25 20:57:00 -- 按钮打印EXCEL模板，标记学习 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.Verb = "Print" Proc.Start() [此贴子已经被作者于2021/2/25 20:57:47编辑过]
|