[已解决]为什么统计总会出错

周小艳

12霞光装卸.rar (25.88 KB, 下载次数: 26)

2011-12-29 18:40 上传

点击文件名下载附件 请那位高手帮帮忙看一下我的这个表格到底错在哪？为什么统计的数据总会出错？有没有什么改良的方法？谢谢，急啊，月底了{:021:}

最佳答案

月排行榜 / 总排行榜

fjmxwrs

2011-12-30 23:14

周小艳 发表于 2011-12-30 21:52
拜托你帮我弄一个简单一点的好吗

表格使用说明：
1.在录表中选择姓名列时自动生成下拉序列，选择姓名后，自动写入当前日期并画边框线；
2.选择品名列时，自动生成下拉序列，选择品名后，自动引用单位和转换值；
3.输入数量时，自动换算出本批重量；
4.在统计表中，选择年或月，自动完成统计
(, 下载次数: 10)

上传

点击文件名下载附件

跳转到最佳答案楼层

lzclzch

你也不是所有的统计都出错的吧
只能一些没有数据的人员出错是不是

无聊的疯子

能把问题说得具体点么?

怎么操作的?在什么时候错的?正确的数据是多少??

附件里什么说明都没有,有点难办哦

周小艳

无聊的疯子 发表于 2011-12-29 18:52
能把问题说得具体点么?

怎么操作的?在什么时候错的?正确的数据是多少??

qh8600

你的思路可以换一下，这个统计不需要用数组，可以在B3用SUNIF函数表达式

无聊的疯子

周小艳 发表于 2011-12-29 19:38

If str_Xm = "" Then   第15行的代码

Else  第46行
            With Sheets(str_Xm)      问题在这里,第47行
                 arr = .Range("A2:H" & .Range("A65536").End(xlUp).Row)
            End With
end if

str_Xm 是有值的,该值就是你选择的"顾晶晶",

也就是说计算的是"顾晶晶"表中的数据,而非"录"表中的数据

所以你说的计算结果是错的,其实就是你的判断问题

无聊的疯子

周小艳 发表于 2011-12-29 19:38

代码本身的计算结果并没有错,只是你没有看懂代码而已,其实这个问题自己一测试就知道问题在那里了

周小艳

无聊的疯子 发表于 2011-12-29 21:42
代码本身的计算结果并没有错,只是你没有看懂代码而已,其实这个问题自己一测试就知道问题在那里了

我对VBA是个菜鸟，能不能麻烦老师给改一下，谢谢

无聊的疯子

周小艳 发表于 2011-12-30 17:31
我对VBA是个菜鸟，能不能麻烦老师给改一下，谢谢

要做修改也得知道你具体是要怎么使用才行啊,其它几个人的表都不用管?

那些表还留里面做什么?能删除吗?

如果不能删除,需要在什么情况下调用他们的数据?

不知道你的使用情况没办法修改代码

zhuosheng

dddddddddddddddddd