怎样用数据字典进行汇总统计

weiguoyin868 · 发表于 2013-4-2 22:14

本帖最后由 weiguoyin868 于 2013-4-2 22:30 编辑

mjzxlmg 发表于 2013-4-2 18:05
测试附件：

If Len(arr(i, j)) Then ...什么意思，我理解应该If Len(arr(i, j))=？ Then
还有没看出那句是按分类累计数据的。理解上也没到。

mjzxlmg · 发表于 2013-4-2 22:53

weiguoyin868 发表于 2013-4-2 22:14
If Len(arr(i, j)) Then ...什么意思，我理解应该If Len(arr(i, j))=？ Then
还有没看出那句是按分类 ...

If Len(arr(i, j)) Then 相当于 If arr(i, j) <>"" Then
加了这句使原表中空白的，不进行累加，输出结果就不会出现0，而是空白

freeffly · 发表于 2013-4-3 08:53

路過學習了
雖然這各例子我不會想到用字典
我只會想到用透視表

weiguoyin868 · 发表于 2013-4-3 21:10

本帖最后由 weiguoyin868 于 2013-4-3 21:32 编辑

mjzxlmg 发表于 2013-4-2 22:53
If Len(arr(i, j)) Then 相当于 If arr(i, j) "" Then
加了这句使原表中空白的，不进行累加，输出结果 ...

仍在研究中，还有疑惑。
这句我的理解是： s = dic(Trim(arr(i, 4))) '将数组ＡRR2列第4列一个数据数据装入字典，具体就是姓名
      MsgBox s
可是MsgBox输出的是0,0,2,3,....什么的，
还有下面语句：
      If s = Empty Then  是判断s变量不为空值吗？是判断姓名为空吗
         m = m + 1
         dic(Trim(arr(i, 4))) = m    '将姓名作为关键字装入字典dic,累计姓名数量作为对应项
         s = m                         '替换
         result(s, 1) = Trim(arr(i, 4))    '输出数组的第一列为姓名
      End If
      result(s, 2) = result(s, 2) + 1    '输出数组的第二列月份累计数
不太理解这段的意思，是计算统计月数的吗

mjzxlmg · 发表于 2013-4-3 21:20

weiguoyin868 发表于 2013-4-3 21:10
仍在研究中，还有疑惑。
这句我的理解是： s = dic(Trim(arr(i, 4))) '将数组ＡRR2列第4列一个数据数 ...

第一次时，S是空白，当关键字加入字典，对应项是M，下面一句是替换，s=m,此时s就不是空白了，实际上相当于第几个关键字，也是行数。

蔡明江 · 发表于 2013-4-3 21:34

10楼朋友的我把月份和序号下面的数据都清楚了内容，把张亮的一行数据复制一行弄到下面，得到的结果与A B 列无紧密联系。这应该是不准确的！

蔡明江 · 发表于 2013-4-3 21:40

6楼同样，把A B列数据下面数据清楚掉，同样统计出了结果，但是这说明统计的数据并不与A B列完全关联的，这样的方式应该也是不对的.大家可测试附件

mjzxlmg · 发表于 2013-4-3 21:43

蔡明江发表于 2013-4-3 21:34
10楼朋友的我把月份和序号下面的数据都清楚了内容，把张亮的一行数据复制一行弄到下面，得到的结果与A B 列 ...

1、要求是按姓名来汇总，当然与序号无关。
2、月数只统计发放了几个月，与哪个月没有关系。10－12也是3个月，1－3也是3个月。
3、不明白楼主说的不准确是什么意思。

weiguoyin868 · 发表于 2013-4-3 22:04

mjzxlmg 发表于 2013-4-3 21:20
第一次时，S是空白，当关键字加入字典，对应项是M，下面一句是替换，s=m,此时s就不是空白了，实际上相当于 ...

可能对字典没理解吧，还不太明白。“第一次时，S是空白”是说关键字没赋值，对吗？

蔡明江 · 发表于 2013-4-3 22:39

我清楚朋友的意思了，我觉得在统计结果应该加入清除A B列数值的代码，不然会把人弄晕，因为统计数据要排除无关字段纳入

		自动登录	找回密码
密码			免费注册

[求助] 怎样用数据字典进行汇总统计