| 以文本方式查看主题 - 易表在线答疑 (http://egrid2000.com/dvbbs/index.asp) -- 用户社区 (http://egrid2000.com/dvbbs/list.asp?boardid=2) ---- [求助]计算凭证附件数 (无内容) (http://egrid2000.com/dvbbs/dispbbs.asp?boardid=2&id=2375) |
| -- 作者：还不错 -- 发布时间：2011/6/3 11:23:00 -- [求助]计算凭证附件数 (无内容) 转换出现异常! |
| -- 作者：Czy -- 发布时间：2011/6/3 12:35:00 -- ？？ |
| -- 作者：还不错 -- 发布时间：2011/6/3 12:58:00 -- egd文件下载 刚才文件没传上来。 |
| -- 作者：Czy -- 发布时间：2011/6/3 13:12:00 -- 没看明白 附件数列的数据是手工输入的吗？ 计算结果只在点按钮时计算出所有不重复的附件数吗？ |
| -- 作者：lyang70 -- 发布时间：2011/6/3 13:13:00 -- 这样吗？ egd文件下载 |
| -- 作者：还不错 -- 发布时间：2011/6/3 13:17:00 -- 下面引用由czy在 2011/06/03 01:12pm 发表的内容： 没看明白 附件数列的数据是手工输入的吗？ 计算结果只在点按钮时计算出所有不重复的附件数吗？ 1.附件数是手工输入的。 2.是的。 |
| -- 作者：还不错 -- 发布时间：2011/6/3 13:20:00 -- 能不能不用辅助列。 |
| -- 作者：lyang70 -- 发布时间：2011/6/3 13:58:00 -- 个人觉得通过辅助列处理方便些，当然，辅助列可以作为临时列处理，将按钮公式设为:AddCol(GridName,"凭证号1",0,False) And EvalFor(GridName,"凭证号1","If(CountFor(GridName,""凭证号"", ""="" ,[凭证号]) >1 And CountFor(GridName,""凭证号"", ""="" ,[凭证号],1,Row) = 1,[凭证号],"""")") And SetVariable("%附件数%",SumFor("记账凭证","附件数","凭证号1", "<>" ,"")) And DeleteCol(GridName,"凭证号1") And MsgBox("附件数为" + Text([%附件数%]) + "件!",1,4) |
| -- 作者：还不错 -- 发布时间：2011/6/3 14:56:00 -- 谢谢你的解答，期待有别的方法。 |
| -- 作者：wjq1072 -- 发布时间：2011/6/3 15:37:00 -- 这样试试？ AddCol(Grid,"k",1, False ) And EvalFor(Grid,"k","Right([凭证号],3)") And SetVariable("%附件数%",MaxFor(Grid,"k")) And MsgBox("附件数为" + Text([%附件数%]) + "件!",1,4) And DeleteCol(Grid,"k") |