老师，我通过赋值筛选了科目汇总表的年月，但报表出来后，我退出时，想撤销筛选，把所有的内容显示出来，这个要怎么操作好？是在窗品再加个按扭写代码，还是怎样？代码要怎样写？如，我通过这个代码按查询键查2018-01的内容，科目汇总表筛选出了2018-01的内容，我退出这个窗口后，科目汇总表还是只显示2018-01的内容，而不是2018-02/2018-03等全部的内容。我是想退出查询后可以显示全部内容。
DataTables("科目汇总表").LoadFilter = "年月 = '" & Vars("查询日期") & "'"
DataTables("科目汇总表").Load
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()
[此贴子已经被作者于2018/7/25 19:06:36编辑过]
加好友 
发短信
Post By：2018/7/25 19:06:00 [只看该作者]
此主题相关图片如下：7al(00`rn$$t5{q@fka2q.png
