求一个数组字典汇总，谢谢。

笨鸟飞不高 · 发表于 2023-12-9 11:14

本帖最后由笨鸟飞不高于 2023-12-9 11:45 编辑

数组字典汇总.zip (33.89 KB, 下载次数: 9)

以附件的数据源，凑一个！

马小呆 · 发表于 2023-12-9 11:22

3190496160 发表于 2023-12-9 10:38
结果为核对，代码仅供参考

感谢你的帮助，两个单位的表格确实有所不同，所以请大侠相助。

你的数据结果有点问题吧。

3190496160 · 发表于 2023-12-9 11:46

你到现在都还没有吧自己的问题描述清楚的嘛，
提取日期范围内的数据，如果相同就合并合计
这里所说的相同是指什么相同？？？目前的代码是按日期相同来汇总的

马小呆 · 发表于 2023-12-9 11:50

笨鸟飞不高发表于 2023-12-9 11:14
以附件的数据源，凑一个！

有一个问题，两个表名称相同的，提取日期怎么只有表1，没有表2的日期呢？

代码写真漂亮，可惜看不懂，原本想着自己拿着大侠帮写的代码，再做做其他表的功课，唉……

蓝桥玄霜 · 发表于 2023-12-9 12:04

汇总的例子：

笨鸟飞不高 · 发表于 2023-12-9 12:06

马小呆发表于 2023-12-9 11:50
有一个问题，两个表名称相同的，提取日期怎么只有表1，没有表2的日期呢？

代码写真漂亮，可惜看不懂， ...

附件更新了，看一下！

yynrzwh · 发表于 2023-12-9 12:07

数组字典汇总.rar (34.25 KB, 下载次数: 13)

马小呆 · 发表于 2023-12-9 12:11

3190496160 发表于 2023-12-9 11:46
你到现在都还没有吧自己的问题描述清楚的嘛，
提取日期范围内的数据，如果相同就合并合计
这里所说的相同 ...

首先感谢你对我需求认真的态度。

名称A、名称B、名称3
这三个如果相同，而且又在日期范围内。
就把提取的数据放在一行。分别写出所在表中的日期，分别把表中的数量合计。两个表出现的次数合计

你的代码是分开提取。旁边放了一个模拟结果。

马小呆 · 发表于 2023-12-9 12:13

shiruiqiang 发表于 2023-12-9 10:13
---------------------

编号有点不同

If (CDate(crr(m, 2)) >= Sheets("汇总").[c3] And CDate(crr(m, 2)) <= Sheets("汇总").[e3]) _
Or (CDate(crr(m, 3)) >= Sheets("汇总").[c3] And CDate(crr(m, 3)) <= Sheets("汇总").[e3]) Then

朋友能解释一下这段代码为什么要这样写呢？

shiruiqiang · 发表于 2023-12-9 12:14

马小呆发表于 2023-12-9 12:13
If (CDate(crr(m, 2)) >= Sheets("汇总").[c3] And CDate(crr(m, 2)) = Sheets("汇总").[c3] And CDate(c ...

判断日期是否在期限内

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

[求助] 求一个数组字典汇总，谢谢。

评分

评分

评分