易表在线答疑技术与交流用户社区 → [求助]计算凭证附件数 (无内容)


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

主题:[求助]计算凭证附件数 (无内容)

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


加好友 发短信
等级:火箭侠 帖子:1937 积分:283 威望:0 精华:0 注册:2006/8/12 9:40:00
[求助]计算凭证附件数 (无内容)  发帖心情 Post By:2011/6/3 11:23:00 [只看该作者]

转换出现异常!

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


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

??

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


加好友 发短信
等级:火箭侠 帖子:1937 积分:283 威望:0 精华:0 注册:2006/8/12 9:40:00
  发帖心情 Post By:2011/6/3 12:58:00 [只看该作者]

egd文件下载
刚才文件没传上来。

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


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

没看明白
附件数列的数据是手工输入的吗?
计算结果只在点按钮时计算出所有不重复的附件数吗?

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


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

这样吗?
egd文件下载

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


加好友 发短信
等级:火箭侠 帖子:1937 积分:283 威望:0 精华:0 注册:2006/8/12 9:40:00
  发帖心情 Post By:2011/6/3 13:17:00 [只看该作者]

下面引用由czy2011/06/03 01:12pm 发表的内容:
没看明白
附件数列的数据是手工输入的吗?
计算结果只在点按钮时计算出所有不重复的附件数吗?

1.附件数是手工输入的。
2.是的。

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


加好友 发短信
等级:火箭侠 帖子:1937 积分:283 威望:0 精华:0 注册:2006/8/12 9:40:00
  发帖心情 Post By:2011/6/3 13:20:00 [只看该作者]

能不能不用辅助列。

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


加好友 发短信
等级:超级版主 帖子:5115 积分:862 威望:0 精华:0 注册:2006/8/15 16:57:00
  发帖心情 Post By: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)

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


加好友 发短信
等级:火箭侠 帖子:1937 积分:283 威望:0 精华:0 注册:2006/8/12 9:40:00
  发帖心情 Post By:2011/6/3 14:56:00 [只看该作者]

谢谢你的解答,期待有别的方法。

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


加好友 发短信
等级:超级版主 帖子:16190 积分:125850 威望:1 精华:0 注册:2006/8/12 12:29:00
  发帖心情 Post By: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")

 回到顶部