Foxtable(狐表)用户栏目专家坐堂 → EXCEL打印问题


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

主题:EXCEL打印问题

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


加好友 发短信
等级:狐精 帖子:3361 积分:24802 威望:0 精华:0 注册:2012/3/26 21:47:00
EXCEL打印问题  发帖心情 Post By:2013/3/12 14:20:00 [显示全部帖子]

使用webBrower可以预览报表 但是用户却能更改预览的数据 如何禁止用户修改webBrower中的数据呢

 

用下面的代码

       Dim Book As New XLS.Book(ProjectPath & "Attachments\销售订单.xls")
        Dim fl As String = ProjectPath & "Reports\销售订单.xls"
        Book.Build()
        Book.Save(fl)
        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
        App.Quit
可以生成预览  但是打开的程序却不是在最顶层 有什么方法改进?


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


加好友 发短信
等级:狐精 帖子:3361 积分:24802 威望:0 精华:0 注册:2012/3/26 21:47:00
  发帖心情 Post By:2013/3/12 14:34:00 [显示全部帖子]

这句不能去啊  去了以后关闭预览会打开EXCEL程序

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


加好友 发短信
等级:狐精 帖子:3361 积分:24802 威望:0 精华:0 注册:2012/3/26 21:47:00
  发帖心情 Post By:2013/3/12 14:58:00 [显示全部帖子]

图片点击可在新窗口打开查看


 回到顶部