以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  设定一个快捷按钮指定某列的数值筛选  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=20352)

--  作者:zxcvbnm1234567
--  发布时间:2012/6/6 9:43:00
--  设定一个快捷按钮指定某列的数值筛选

狐狸爸爸还有一个问题是在上表设定一个快捷按钮指定某列的数值筛选      请问代码如何写

 

 

 


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20120602081402.png
图片点击可在新窗口打开查看

--  作者:狐狸爸爸
--  发布时间:2012/6/6 9:53:00
--  
数值筛选有很多,大于、小于、不等于、不大于、范围之内等等,你说的是那个?
--  作者:zxcvbnm1234567
--  发布时间:2012/6/6 11:11:00
--  
我说的意思是指定应收货款列等于数值筛选,
--  作者:zxcvbnm1234567
--  发布时间:2012/6/6 11:29:00
--  
我说的意思是指定应收货款列等于数值筛选,
--  作者:狐狸爸爸
--  发布时间:2012/6/6 11:30:00
--  

With Tables("表的名称")
    Dim c As Integer= .Cols("应收货款").Index
   . Select(.RowSel, c, .RowSel, c)
    Syscmd.Filter.Equal(False)
End With

 

其实没有必要做按钮的,右击这一列的某个单元格就可以筛选。