以文本方式查看主题 - 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=195633) |
-- 作者:王小风 -- 发布时间:2025/2/24 18:18:00 -- 【求助】求助老师,用excel报表如何打印窗口表中符合条件的数据 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() 这样的打印只能打印选定行的数据,如何写打印表中复合条件的数据
|
-- 作者:有点蓝 -- 发布时间:2025/2/24 20:02:00 -- 这种?http://www.foxtable.com/webhelp/topics/0201.htm |