Foxtable(狐表)用户栏目专家坐堂 → 关于菜单筛选设计的问题


  共有10944人关注过本帖树形打印复制链接

主题:关于菜单筛选设计的问题

帅哥哟,离线,有人找我吗?
kevin11
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:60 积分:459 威望:0 精华:0 注册:2011/9/21 11:04:00
关于菜单筛选设计的问题  发帖心情 Post By:2011/10/24 14:25:00 [只看该作者]

请教各位专家,我在菜单设计中添加了“筛选”功能区,及“期间筛选”的功能组,想根据我输入的数值来进行筛选,我参考帮助设置了代码,但是始终出现错误提示,请专家指点哪里出了问题?谢谢!
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目.table


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/10/24 14:32:00 [只看该作者]

Dim 年度 As Integer
Dim 月度 As Integer
With RibbonTabs("筛选")("期间筛选")
    年度 = .Items("年度").Value
    月度 = .Items("月度").Value
End With
Tables("合同信息汇总表").Filter = "[年度] = " & 年度 & " And [月度] = " & 月度

 

1、年度和月度都是整数,不是日期,不需用用符号#括起来

2、不应用CurrentTable,而应该用Tables("合同信息汇总表")、


 回到顶部
帅哥哟,离线,有人找我吗?
kevin11
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:60 积分:459 威望:0 精华:0 注册:2011/9/21 11:04:00
回复:(狐狸爸爸)Dim 年度 As IntegerDim 月度 As I...  发帖心情 Post By:2011/10/24 15:21:00 [只看该作者]

感谢狐爸爸,原来如此。

 回到顶部