领用单中有筛选表,初始不现实内容, 选择资产后选定的条目显示到此表中,但是点了选择资产后 表中会显示表格中所有行,筛选似乎失效了, 选择资产里选中后又可以正常显示选中的资产.
是哪里代码的问题,或者要如何实现,在没有选择提交时不显示条目
资产领用表中 afterload 代码
Tables("新增领用_选定资产表").DataSource = DataTables("资产明细")
Tables("新增领用_选定资产表").AllowEdit = False
Tables("新增领用_选定资产表").Filter = "[_Identify] is null"
选择资产按钮 代码
Forms("选择资产").open
选择资产的 afterload 代码
DataTables("资产明细").LoadFilter = ""
DataTables("资产明细").Load()
Tables("选择资产_资产选择").DataSource = DataTables("资产明细")
Tables("选择资产_资产选择").Filter = "[使用部门] is null And [使用人] is null"
Tables("选择资产_资产选择").ShowCheckBox = True
Tables("选择资产_资产选择").AllowEdit = False