求助：列表框数值汇总！

martinj

请问哪位知道列表框里的一栏数值怎么汇总！！！跪求！！！！万分感激！！！！[em06]

gzh97730

很想帮你,问题是:

能不能贴个例子上来看看,大家都能节约点时间....



哎,月底一看工资单就知道我没办法纳税....

martinj

http://www.office-cn.net/Article/Class5/Class12/200312/180.htmlDim I As Integer '定义变量存储被选中行的序号Dim Sum_money AS Currency '定义变量存储合计数值，因为是货币类型，使用CurrencySum_money = 0For I = 0 To 列表1.ListCount - 1 '因为有标题，所以-1

     Sum_money = Sum_money + 列表1.Column(5, I) ' 第5列为要合计字段Next I这样基本能解决合计问题，但是如果列表中某个字段为0，列表1.Column读出来就是一个空字符串，显示类型不匹配错误信息，这个怎么解决啊？？？

[em06]

zyp

直接用dsum函数从底层表中取得来得更方便些当然数据源必须各列表框的一致，包含筛选条件