- 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=125300)
-- 发布时间：2018/9/25 18:39:00
-- 多选生成EXCEL报表
HELLO,做了个代码来通过设定好的模板生产EXCEL报表，请问下要如何实现选择哪几行就显示哪几行内容。。
下图带复选框的表是窗口表 关联表（表A.表B）。。。现在无论怎么选都是生成所有信息。。。请问要怎么改，谢谢！！！
按钮代码为
Dim Book As New XLS.Book(ProjectPath & "Attachments\\报价模板.xls")
Dim fl As String = ProjectPath & "Reports\\Quotation Sheet.xls"Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl
Proc.Start()
-- 发布时间：2018/9/25 18:55:00
--
方法一：建议弄一个逻辑列，勾选逻辑列。
方法二：写代码
Dim str As String
For Each r As Row In Tables("销售").GetCheckedRows
str = str & "," & r("_Identify")
Next
msgbox("[_Identify] in (" & str.Trim(",") & ")")
-- 发布时间：2018/9/28 15:16:00
--
思路清楚了。。。谢了。