以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  狐表新人,问筛选代码问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=20879)

--  作者:qiqihuangyan
--  发布时间:2012/6/21 17:47:00
--  狐表新人,问筛选代码问题
刚接触狐表,正在学习中,目前只会简单的表制作,简单菜单制作。
现在遇到个问题,筛选一张表中非0数据,代码自己看帮助写了下,运行会报错。。求大神指教。。能不能帮我写下代码参考一下。万分感谢。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:库存汇总.xls


附件是表格样张,需要筛选去掉列中为“0”的数据。。求代码
--  作者:狐狸爸爸
--  发布时间:2012/6/21 17:52:00
--  
Tables("某个表").Filter = "某列1 <> 0 And  某列2 =<> 0"
--  作者:qiqihuangyan
--  发布时间:2012/6/21 17:59:00
--  
狐爸好快。。
列中数据是对应第一列产品名称的,筛选不同列中得数据,目的是去掉“0”  
例如“商品1 列1=0 列2=0 列3=1” 是不是中间应该用 Or 来连接。 
我自己写的代码是:Tables("库存汇总").Filter = "入库数量_2 <> 0 Or 出库数量_2 <> 0  Or 结余数量_2 <> 0 "  
狐爸帮我看看。
--  作者:qiqihuangyan
--  发布时间:2012/6/21 18:03:00
--  
另外还想问一个,删除某张表的代码是怎么样,帮助中没有找到。。只有点选着删表。。我想做成按键
--  作者:狐狸爸爸
--  发布时间:2012/6/21 18:04:00
--  
Tables("库存汇总").Filter = "入库数量_2 <> 0 And 出库数量_2 <> 0 And 结余数量_2 <> 0 "
--  作者:qiqihuangyan
--  发布时间:2012/6/21 18:23:00
--  
谢谢狐爸  你的代码,我变动成  
Tables("库存汇总").Filter = "入库数量_2 <> 0 Or 出库数量_2 <> 0 Or 结余数量_2 <> 0 "
后就满足要求了。原来我之间自己看帮助,写的代码,把列用[]框起来。所以出错。

在帮我看个删除指定表  如 表1  的代码吧。。