- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 一个excel工作簿有多个表 怎么对应动态写入打印条件呢？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=180268)
-- 发布时间：2022/10/11 13:51:00
-- 一个excel工作簿有多个表 怎么对应动态写入打印条件呢？
此主题相关图片如下：3221.png
当前代码如下：
Dim Book As New XLS.Book(ProjectPath & "Attachments\\走读式谈话登记台账分类按月.xls") \'打开模板
Dim fl As String = ProjectPath & "Reports\\走读式谈话登记台账分类按月.xls"
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Sheet(2,16).Value = "<年度 = \'" & Date.Today.Year & "\' and 月份 = \'" & Date.Today.Month & "\'>" \'写入打印条件
Dim Sheet1 As XLS.Sheet = Book.Sheets(1)
Sheet1(2,16).Value = "<年度 = \'" & Date.Today.Year & "\' and 月份 = \'" & Date.Today.Month & "\' and 措施类别 = \'一类谈话\'>" \'写入打印条件
Dim Sheet2 As XLS.Sheet = Book.Sheets(2)
Sheet2(2,16).Value = "<年度 = \'" & Date.Today.Year & "\'and 月份 = \'" & Date.Today.Month & "\' and 措施类别 = \'二类谈话\'>" \'写入打印条件
Dim Sheet3 As XLS.Sheet = Book.Sheets(3)
Sheet3(2,16).Value = "<年度 = \'" & Date.Today.Year & "\'and 月份 = \'" & Date.Today.Month & "\' and 措施类别 = \'三类谈话\'>" \'写入打印条件
Book.Build() \'生成报表
Book.Save(fl)
Dim Proc As New Process
Proc.File = fl
Proc.Start()
上述代码，运行的时候 没有分别写入……4个表的数据都一样……
-- 发布时间：2022/10/11 13:58:00
--
execl模板仅支持在父表添加条件，而父表只能有一个，子表加载的数据是无条件输出的。
-- 发布时间：2022/10/11 14:01:00
-- 回复：（有点蓝）execl模板仅支持在父表添加条件，而父...
只有一个走读式谈话台账这个数据表 想分别对应四个条件 然后写入四个不同的数据
此主题相关图片如下：3221.png
-- 发布时间：2022/10/11 14:07:00
--
没有办法，模板没有这种用法。
-- 发布时间：2022/10/12 8:30:00
--
没明白的你想要的效果。举例说明一下呢
-- 发布时间：2022/10/12 9:55:00
-- 回复：（cd_tdh）没明白的你想要的效果。举例说明一下...
就是一个数据表 里面有类别这个字段 我要根据类别来生成多个不同的excel表 这些excel表又在同一个excel文件中 依次为1234 excel文件中的表格都一样 只是类别条件不一样 怎么生成呢？
-- 发布时间：2022/10/12 9:57:00
-- 回复：（有点蓝）没有办法，模板没有这种用法。先把4个...
这四个条件的数据 都是在同一个表中的呢 只是在生成excel文件的时候 我划分成了汇总 类别1 类别2 类别3 四个不同的条件数据 这四个条件数据的表文件又是一样的