怎样用VBA匹配查询统计分摊费用

SCWYZJ

求助：我有一张员工住宿费用统计表（详见附件），怎样用VBA(不用函数公式）实现统计住宿天数及匹配查询并统计各房间各员工应分摊的费用。麻烦老师帮忙看看，如何写代码。谢谢。小花静候

汉唐

请看附件，仅供参考

SCWYZJ

汉唐 发表于 2023-2-6 16:19
请看附件，仅供参考

汉唐 老师，辛苦了。我试了一下，如果房间没住满的情况下回报错，还有不同小区存在相同房间号，不能识别。还有级别的情况下，级别高的反而分摊跟多（也怪我没细说，超定额才要分摊超额），，数组我有点晕，要慢慢消化。我自自己试着自己写的代码完成了日期的的统计，就差分摊没弄懂。非常谢谢您。

汉唐

1、关于房屋没有住满的情况出错情况，增加一个arr(i,5)>0的判断即可（如果员工编号为空。那么...）
2、实际费用分摊是按等级定额分配的，等级限额越高，分摊的越多，如果按限额控制，那超额的部分按什么标准分摊？
3、不存在不同小区相同相同房号不能识别的问题，分类是按小区+房号分类的，s=小区+房号

SCWYZJ

汉唐 发表于 2023-2-7 08:20
1、关于房屋没有住满的情况出错情况，增加一个arr(i,5)>0的判断即可（如果员工编号为空。那么...）
2、实 ...

老师，其实费用不用分那么细，只要总费用就可以了；比如：按级别量化到每人每天的总费用配额（水电气）。按30天计算，后去用房间总金额用减去员工总的实住天数应该的配额总金额得到超额费用，再用超额费用除以实住人数即可，等于或小于总配额不计算

汉唐

实际费用等于或小于总配额，按什么标准分配到每个人？按人数分配？按配额分配？

SCWYZJ

汉唐 发表于 2023-2-7 11:39
实际费用等于或小于总配额，按什么标准分配到每个人？按人数分配？按配额分配？

实际配额等于或小于总配额，则不用计算，超额才计算，超额部分按实际人数入住总天数分摊到每天，然后去乘以各自对应的天数，即可

汉唐

哦，实际总费用小于总配额时，每个人的费用为0

SCWYZJ

汉唐 发表于 2023-2-7 13:30
哦，实际总费用小于总配额时，每个人的费用为0

老师，能否帮忙改改不？谢谢

汉唐

老师就不敢当，我只是初级，水平有限，你都是中级了，我称你老师才对。请参考附件