以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 设计思路 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=147324) |
||||
-- 作者:keli0917 -- 发布时间:2020/3/14 9:20:00 -- 设计思路 此主题相关图片如下:1.png 此主题相关图片如下:2.png |
||||
-- 作者:keli0917 -- 发布时间:2020/3/14 9:27:00 -- 点选择方案下拉框也可以载入所选择的方案。 |
||||
-- 作者:有点蓝 -- 发布时间:2020/3/14 9:34:00 -- 添加一个方案表:方案名称,方案id列表 保存方案:先保存图1等,然后遍历获取主键列表保存下来 Dim s As String = "" For Each r As Row In Tables("窗口1_table1").Rows s = s & "," & r("_Identify") Next s = s.Trim(",") 导入方案,查询方案表获取方案id列表,做筛选即可 dim dr as datarow = datatables("方案表").find("方案名称=\'" & 文本框输入的方案名称 & "\'") if dr isnot nothing then Tables("窗口1_table1").filter = "_Identify in (" & dr("方案id列表") & ")" end if |
||||
-- 作者:keli0917 -- 发布时间:2020/3/14 15:54:00 -- _Identify 不存在。。。。。
|
||||
-- 作者:keli0917 -- 发布时间:2020/3/14 15:56:00 -- 另存为方案时提示列“_Identify”不属于表 导入银行流水_Table1。 [此贴子已经被作者于2020/3/14 15:56:41编辑过]
|
||||
-- 作者:有点蓝 -- 发布时间:2020/3/14 16:06:00 -- 这种窗口表是临时表,不适合3楼的用法 建议把表格数据直接导出execl文件保存下来,文件名称为方案名称,需要的时候根据名称找到文件导入execl数据。
|