Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 1649|回复: 6

药品统计问题

[复制链接]
发表于 2020-1-5 09:09 | 显示全部楼层 |阅读模式
生成一个“统计”工作表,统计A2:J19这个区域
同一药品、同一进价、库存数量之和。
如下:
请老师们帮帮忙,谢谢老师们了!!!
无标题.jpg
Excel中VBA统计同商品同进价库存数量之和.rar (40.72 KB, 下载次数: 4)
发表于 2020-1-5 12:11 | 显示全部楼层
Excel中VBA统计同商品同进价库存数量之和.zip (46.36 KB, 下载次数: 10)

评分

参与人数 1学分 +2 收起 理由
yjwdjfqb + 2 学习

查看全部评分

回复

使用道具 举报

发表于 2020-1-5 16:09 | 显示全部楼层
本帖最后由 zjdh 于 2020-1-5 16:34 编辑

楼主要的是同品种同价合计呀
回复

使用道具 举报

发表于 2020-1-5 16:26 | 显示全部楼层
统计同商品同进价库存.rar (51.09 KB, 下载次数: 20)

评分

参与人数 1学分 +2 收起 理由
yjwdjfqb + 2 谢谢老师,就是这样的!!!

查看全部评分

回复

使用道具 举报

 楼主| 发表于 2020-1-6 20:19 | 显示全部楼层

老师你好:

我把代码中的
arr(i, 8)表述式,改成 Cells(i, "H") 表述式,怎么不行呀

如果 Cells(i, "H") 改,怎么改呀,麻烦老师帮我改下,谢谢老师了!
回复

使用道具 举报

发表于 2020-1-7 07:25 | 显示全部楼层
yjwdjfqb 发表于 2020-1-6 20:19
老师你好:

我把代码中的

看一下一开头定义的这一句ARR = Sheets("数据").Range("A1").CurrentRegion,ARR是一个数组,你怎么能用单元格来替代它呢?这是不能改的。
回复

使用道具 举报

发表于 2020-1-7 08:36 | 显示全部楼层
yjwdjfqb 发表于 2020-1-6 20:19
老师你好:

我把代码中的

为啥要改,说说理由。
ARR = Sheets("数据").Range("A1").CurrentRegion,已将数据表中的数据提取过来了,只要从ARR中提取数据作处理就可以啦!没必要再到工作表中提数据啦,这样处理,速度将大幅提高!


评分

参与人数 1学分 +2 收起 理由
yjwdjfqb + 2 学习

查看全部评分

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-4-26 14:01 , Processed in 0.147158 second(s), 11 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表