Foxtable(狐表) → 用户栏目 → 专家坐堂 → 【求助】求助老师，用excel报表如何打印窗口表中符合条件的数据


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

主题：【求助】求助老师，用excel报表如何打印窗口表中符合条件的数据
帅哥哟，离线，有人找我吗？
王小风
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：48 积分：515 威望：0 精华：0 注册：2021/9/2 16:35:00 		【求助】求助老师，用excel报表如何打印窗口表中符合条件的数据  发帖心情 Post By：2025/2/24 18:18:00 [只看该作者]

For Each a As Row In Tables("备件出入库") ' 判断是否打印值，如果是false  则循环标记为true
    If a("是否打印") = True Then
        e.Cancel = True
        Exit For
    Else
        a("是否打印") = True
    End If
Next
Dim Book As New XLS.Book(ProjectPath & "Attachments\入库单.xls")
Dim fl As String = ProjectPath & "Reports\入库单.xls"
Book.Build() '生成细节区
' Book.Sheets(0).Rows.RemoveAt(0) '删除第一行,Excel报表的第一行通常是标记行
Book.Save(fl) '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = fl
Proc.Start()
这样的打印只能打印选定行的数据，如何写打印表中复合条件的数据
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：112401 积分：572273 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2025/2/24 20:02:00 [只看该作者]


 回到顶部
帅哥哟，离线，有人找我吗？
王小风
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：48 积分：515 威望：0 精华：0 注册：2021/9/2 16:35:00 		  发帖心情 Post By：2025/2/25 11:43:00 [只看该作者]

老师 这种方式只能打印选定的行，我的目的是打印窗口表中数据，不用再取选定某行(窗口表的数据是经过特殊筛选)。我的思路有三个、1、在打印时先再次筛选，打印表中所有的数据。2、提起表中的符合条件的数据，填充到模板中。3、做专业报表！

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：112401 积分：572273 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2025/2/25 11:53:00 [只看该作者]

你理解错了。2楼用法和选定行没有任何关系。就是用来打印指定条件的数据的。

<ALL>就是适合上面的第1点，打印所有筛选后的数据
<某某列='某某值'> 就是适合上面的第2点，打印符合条件的数据
 回到顶部
帅哥哟，离线，有人找我吗？
王小风
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：48 积分：515 威望：0 精华：0 注册：2021/9/2 16:35:00 		  发帖心情 Post By：2025/2/25 13:17:00 [只看该作者]

明白了老师图片点击可在新窗口打开查看

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04492 秒, 4 次数据查询