ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
300集Office 2010微视频教程 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 2135|回复: 16

[求助] 在线等,BOM结构下,用SUMIF归类统计,求避免重叠统计的VBA代码

[复制链接]

TA的精华主题

TA的得分主题

发表于 2018-12-13 15:33 | 显示全部楼层 |阅读模式
本帖最后由 keaney 于 2018-12-13 20:16 编辑

附件是一个根据工作任务的缩进,WBS编码自动生成的程序,C列是每个工作任务对应的金额,子任务的和等于上一级父任务的金额。
D列是手动输入非空值后,输入的这个非空值,若满足SUMIF的条件,则对应的金额会被sumif函数统计,但人为的手动输入,可能会把子级跟父级同时选了而导致金额重叠计算的问题,为避免重叠被sumif函数统计,现求一个检查D列的条件是否被重叠统计的程序Test2(重复选中则填充红色),实现E列的效果。本人VBA小白一枚,模块2是尝试写的代码,但不对,求指点。

见附件 WBSSample.rar (18.39 KB, 下载次数: 6)

TA的精华主题

TA的得分主题

发表于 2018-12-13 15:36 | 显示全部楼层
参见
怎么程序计算出来总是差一点点,另外能不能把它变得飞快~
http://club.excelhome.net/thread-1450637-1-1.html
(出处: ExcelHome技术论坛)
8L

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-12-13 15:51 | 显示全部楼层
本帖最后由 keaney 于 2018-12-13 15:57 编辑
yjh_27 发表于 2018-12-13 15:36
参见
怎么程序计算出来总是差一点点,另外能不能把它变得飞快~
http://club.excelhome.net/thread-145063 ...

阅读过yjh_27老师的好几个BOM求和汇总的帖子,题目命题类似,但也有一些不同之处,此处是判断是否被重复统计的,由于本人VBA小白一枚,还不会灵活变通使用,能否帮忙修改附件,谢谢~

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-12-13 16:42 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2018-12-13 17:19 | 显示全部楼层
keaney 发表于 2018-12-13 15:51
阅读过yjh_27老师的好几个BOM求和汇总的帖子,题目命题类似,但也有一些不同之处,此处是判断是否被重复 ...

不明白这样有什么意义,要核对把整列重新计算不是更容易吗

TA的精华主题

TA的得分主题

发表于 2018-12-13 17:50 | 显示全部楼层
yjh_27 发表于 2018-12-13 17:19
不明白这样有什么意义,要核对把整列重新计算不是更容易吗

直接用VBA计算出个结果放进去比去对比一次来得更快呢?

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-12-13 18:45 | 显示全部楼层
本帖最后由 keaney 于 2018-12-13 19:04 编辑
yjh_27 发表于 2018-12-13 17:19
不明白这样有什么意义,要核对把整列重新计算不是更容易吗


yjh_27老师,本帖的目的不是汇总计算,而是避免重复提取统计,SUMIF是用来条件归类提取的

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-12-13 19:30 来自手机 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
自己顶上去

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-12-13 20:00 来自手机 | 显示全部楼层

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-12-13 20:17 来自手机 | 显示全部楼层
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

关闭

最新热点上一条 /1 下一条

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-4-24 16:59 , Processed in 0.044430 second(s), 10 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

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