易表在线答疑技术与交流用户社区 → [求助]公式运行出现不对,特请教。


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

主题:[求助]公式运行出现不对,特请教。

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


加好友 发短信
等级:蝙蝠侠 帖子:820 积分:2154 威望:0 精华:0 注册:2010/5/12 19:07:00
[求助]公式运行出现不对,特请教。  发帖心情 Post By:2011/11/11 19:27:00 [只看该作者]

详见编辑栏
egd文件下载

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


加好友 发短信
等级:蝙蝠侠 帖子:820 积分:2154 威望:0 精华:0 注册:2010/5/12 19:07:00
  发帖心情 Post By:2011/11/11 21:24:00 [只看该作者]


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


加好友 发短信
等级:蝙蝠侠 帖子:820 积分:2154 威望:0 精华:0 注册:2010/5/12 19:07:00
  发帖心情 Post By:2011/11/12 15:20:00 [只看该作者]

顶上去

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


加好友 发短信
等级:超级版主 帖子:16190 积分:125850 威望:1 精华:0 注册:2006/8/12 12:29:00
  发帖心情 Post By:2011/11/12 16:02:00 [只看该作者]

顶是没有用的!还得把问题叙述详细一点。

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


加好友 发短信
等级:蝙蝠侠 帖子:820 积分:2154 威望:0 精华:0 注册:2010/5/12 19:07:00
  发帖心情 Post By:2011/11/12 16:08:00 [只看该作者]

按钮“查询峰谷不平”里的公式错在何处?

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


加好友 发短信
等级:蝙蝠侠 帖子:820 积分:2154 威望:0 精华:0 注册:2010/5/12 19:07:00
  发帖心情 Post By:2011/11/12 20:38:00 [只看该作者]

这个公式错在那儿?
SetLabel("  ","稍等---") And SortCol("示数类型",1) And SortCol("电能表资产编号",1) And AddCol(Grid,"tt",1, False ) And AddCol(Grid,"pp",3, False ) And EvalFor(Grid,"tt","If(Cell(Row,""示数类型"")=""正有功谷"" And Cell(Row +1,""示数类型"")=""正有功总"" And Cell(Row-1,""示数类型"")=""正有功峰"",Cell(Row+1,""本次示数"")-Cell(Row-1,""本次示数""),"""")") And EvalFor(Grid,"pp","Cell(Row,""示数类型"")=""正有功谷"" And Cell(Row+1,""示数类型"")=""正有功总"" And Cell(Row-1,""示数类型"")=""正有功峰"" And [本次示数] <> [tt]") And If(MinFor(Grid,"pp")=0,MsgBox("峰谷正常!",0),Eval("MsgBox("""+Text(Substitute(ListFor(Grid,"用户编号","pp",-1)+"|","|","用户出错"+Char(13)))+""",0)")) And SetLabel("  ","稍等---") And If(MsgBox("峰谷错误已经查到是否需要筛选出来更改错误?",2,4),EvalFor(Grid,"pp","If(Cell(Row +1,""pp"")=-1,-1,[pp])",1,Rows -1) And EvalFor(Grid,"pp","If(Cell(Row +2,""pp"")=-1,-1,[pp])",2,Rows-1) And FilterFor("pp","=",-1,2), True )And ClearGrid("峰谷不平处理表") And CopyRows("峰谷不平处理表","pp","=",-1) And DelRow("峰谷不平处理表",1) And DeleteCol(Grid,"pp") And DeleteCol(Grid,"tt") And OpenWindow(0) And SetLabel(" ","OK!")

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


加好友 发短信
等级:超级版主 帖子:5115 积分:862 威望:0 精华:0 注册:2006/8/15 16:57:00
  发帖心情 Post By:2011/11/15 15:39:00 [只看该作者]

你还是直接描述出你这个按钮要实现的目的吧...

 回到顶部