- 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=75546)
-- 发布时间：2015/10/10 8:47:00
-- [求助]请教一下导出EXCEL问题
有两个关联表，父表是出库单表；子表是出库单明细表；在窗口中有BUTTON按钮（名称：导出对帐单）；
设想是在父表中增加一个逻辑列，当逻辑列被勾选时，点“导出对帐单”按钮，则导出所有被勾选的出库单及出库单明细内容；请教老师具体要怎么弄？
按钮代码是这样的：
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.Start()
使用如上代码只能导出一个当前出库单及出库单明细内容，但想导出多个出库单及出库单明细内容，请教老师具体要怎么弄？
-- 发布时间：2015/10/10 9:03:00
--
首先在模板出库单表表名那行设置“<ALL>”标记。然后根据勾选列做个筛选，再执行上面的代码即可
-- 发布时间：2015/10/10 9:45:00
--
能不能详细说一下是怎么筛选的？
-- 发布时间：2015/10/10 10:01:00
--
Tables("出库单").Filter="逻辑列=1"
-- 发布时间：2015/10/10 10:54:00
--
老师，关于首先在模板出库单表表名那行设置“<ALL>”标记，这个是在哪一行？
我的模板见附件图片；
[此贴子已经被作者于2015/10/10 10:55:13编辑过]
-- 发布时间：2015/10/10 10:56:00
--
怎么上不了图片？
此主题相关图片如下：001.png
-- 发布时间：2015/10/10 11:12:00
--
此主题相关图片如下：qq图片20151010110946.png
-- 发布时间：2015/10/10 11:25:00
--
成了，谢谢老师