易表在线答疑技术与交流用户社区 → 请教:按钮公式问题


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

主题:请教:按钮公式问题

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


加好友 发短信
等级:论坛游侠 帖子:238 积分:-30 威望:0 精华:0 注册:2006/12/31 11:05:00
请教:按钮公式问题  发帖心情 Post By:2007/10/10 10:14:00 [只看该作者]

If([%年份%]="",MsgBox("请选择年份!",0),if(text([%月份%])="",MsgBox("请选择月份!" ,0),if([%品牌%]="",MsgBox("请选择品牌!",0),if(findrow(text([年份])+"源数据","月份"," <> ",[%月份%],"品牌","=",[%品牌%],"年份","=",[%年份%])=0,MsgBox("源数据中没有相应数据!" ,0) ,ClearGrid(Grid) And AppendFor("指标列表","分公司","分公司","分公司","<> ","")  and DelFor(grid,"分公司","=","") and EvalFor(Grid,"年份","[%年份%]") And EvalFor(Grid,"品牌","[%品牌%]") And EvalFor(Grid,"月份","[%月份%]") And RecalcGrid("按月份",1) And SetRowHeight(26)))))
     我在录入窗口选择年份 月份 品牌后,如果"2007源数据"表中没有10月份数据,应显示"源数据中没有相应数据!",但实际操作中,语句if(findrow(text([年份])+"源数据","月份"," <> ",[%月份%],"品牌","=",[%品牌%],"年份","=",[%年份%])=0,MsgBox("源数据中没有相应数据!" ,0),不起作用,即满足条件"月份"," <> ",[%月份%],也不显示没有数据的提示,请指教错在哪

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


加好友 发短信
等级:超级版主 帖子:13147 积分:-89 威望:0 精华:0 注册:2006/8/11 11:14:00
  发帖心情 Post By:2007/10/10 10:33:00 [只看该作者]

这里有两个问题:
findrow(text([年份])+"源数据","月份"," <> ",[%月份%],"品牌","=",[%品牌%],"年份","=",[%年份%])=0

执行此公式时要看你的焦点行中的年份列是那年的数据,如果当前行的年份2006年,而变量中的年份是2007年,就牛头不对马嘴了。

另一个问题,如果说查找相同年份、月份、品牌,我想公式中的不等于应该改成等于才对。

没见到文件,上面只是我的分析,供参考。


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


加好友 发短信
等级:论坛游侠 帖子:238 积分:-30 威望:0 精华:0 注册:2006/12/31 11:05:00
  发帖心情 Post By:2007/10/10 11:37:00 [只看该作者]

谢谢!,应该写成"="。当前行的年份是同一年的数据。

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


加好友 发短信
等级:论坛游侠 帖子:238 积分:-30 威望:0 精华:0 注册:2006/12/31 11:05:00
  发帖心情 Post By:2007/10/10 11:41:00 [只看该作者]

在请教以问题:原正确公式为:
If([%年份%]="",MsgBox("请选择年份!",0),if(text([%月份%])="",MsgBox("请选择月份!" ,0),if([%品牌%]="",MsgBox("请选择品牌!",0),Eval("CreateGrid(""临时表"",""指标"",0,""品牌"",0,""分公司"",0,"""+[%年份%]+"年"+Substitute(Substitute(if(Number([%月份%])=10,Left("1|2|3|4|5|6|7|8|9|10|11|12",Number([%月份%])*2),if(Number([%月份%])=11,Left("1|2|3|4|5|6|7|8|9|10|11|12",Number([%月份%])*2+1),if(Number([%月份%])=12,Left("1|2|3|4|5|6|7|8|9|10|11|12",Number([%月份%])*2+2),Left("1|2|3|4|5|6|7|8|9|10|11|12",Number([%月份%])*2-1)))),"|","|"+[%年份%]+"年"),"|","月"",1,""")+"月"",1)") and OpenGrid("临时表") and ClearGrid(Grid) And AppendFor("指标列表","指标","指标")  and DelFor(grid,"指标","=","") and EvalFor(Grid,"分公司","[%分公司%]") And EvalFor(Grid,"品牌","[%品牌%]")  and SetVariable("%A%",3) And Eval(Mid(Rept(" And SetVariable(""%A%"",[%A%]+1) And SetColformula(""临时表"",[%A%],""FindText(""""text([年份])+源数据"""",[指标],""""年份"""",""""="""",[%年份%],""""品牌"""",""""="""",[%品牌%],""""月份"""",""""="""",Col-3,""""分公司"""",""""="""",[分公司])"")",Number([%月份%])),5)) and RecalcGrid("临时表",1) and OpenGrid("按公司3") and ClearGrid(Grid) and renamecol(4,[%年份%]+"年1月")and renamecol(5,[%年份%]+"年2月")and renamecol(6,[%年份%]+"年3月") and renamecol(7,[%年份%]+"年4月") and renamecol(8,[%年份%]+"年5月") and renamecol(9,[%年份%]+"年6月") and renamecol(10,[%年份%]+"年7月") and renamecol(11,[%年份%]+"年8月")and renamecol(12,[%年份%]+"年9月")and renamecol(13,[%年份%]+"年10月") and renamecol(14,[%年份%]+"年11月")and renamecol(15,[%年份%]+"年12月")  and AppendRows("临时表") and DelFor("按公司3","指标","=","")  And SetRowHeight(25))))
   我想修改其中:FindText(""""源数据"""",[指标],""""年份"""",""""="""",[%年份%],""""品牌"""",""""="""",[%品牌%],""""月份"""",""""="""",Col-3,""""分公司"""",""""="""",[分公司])"")
   想用text([年份])+"源数据"替换"源数据"试了多次不行,请教!!

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


加好友 发短信
等级:超级版主 帖子:13147 积分:-89 威望:0 精华:0 注册:2006/8/11 11:14:00
  发帖心情 Post By:2007/10/10 12:03:00 [只看该作者]

""FindText(text([年份])+""""源数据"""",[指标],""""年份"""",""""="""",[%年份%],""""品牌"""",""""="""",[%品牌%],""""月份"""",""""="""",Col-3,""""分公司"""",""""="""",[分公司])""

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


加好友 发短信
等级:论坛游侠 帖子:238 积分:-30 威望:0 精华:0 注册:2006/12/31 11:05:00
  发帖心情 Post By:2007/10/10 13:43:00 [只看该作者]

谢谢

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


加好友 发短信
等级:论坛游民 帖子:107 积分:0 威望:0 精华:0 注册:2008/3/11 15:48:00
[求助]像此类问题的代码怎么写?  发帖心情 Post By:2008/3/16 14:22:00 [只看该作者]

[这个贴子最后由smileboy在 2008/03/16 04:14pm 第 1 次编辑]

现有文件A.egd    B.egd
要将A.egd文件内“表3”的最后一行数据copy到B.egd的“表2”内。

-=-=-=- 以下内容由 jackslowf##k2008年03月16日 02:25pm 时添加 -=-=-=-
而且在下次输入时B.egd表2的数据是会逐行添加的

[glow=255,red,2]提示:标题不明确,自行修改一下![/glow]


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


加好友 发短信
等级:论坛游民 帖子:107 积分:0 威望:0 精华:0 注册:2008/3/11 15:48:00
  发帖心情 Post By:2008/3/16 14:58:00 [只看该作者]

望各位老师不吝赐教,小弟在线急等。。

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


加好友 发短信
等级:超级版主 帖子:8672 积分:1734 威望:0 精华:0 注册:2006/8/11 10:52:00
  发帖心情 Post By:2008/3/16 15:37:00 [只看该作者]

参考export

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


加好友 发短信
等级:论坛游民 帖子:107 积分:0 威望:0 精华:0 注册:2008/3/11 15:48:00
  发帖心情 Post By:2008/3/16 15:44:00 [只看该作者]

我知道用export命令,但是每次A.egd文件内“表3”内数据的行数是不确定的,而我每次需要的只是最后一行。请问要怎么写?

 回到顶部