按条件查询获得摘要栏的文本值，合并内容到一个单元格

沂蒙奇迹

要求：1、日报的备注栏，使用的EXCEL公式，转化为VBA公式，按照日期筛选当天的摘要内容合集
2、周报的备注栏，显示本周的摘要内容合集，周日-周六为一周，分开收入项和支出项
3、最好有函数的简单说明


求大师帮助，谢谢！

hfwufanhf2006

1、日报感觉是可以统计的，就是不知道“摘要合集”是什么？
     这种流水账，数量可能会很多，一条记录一个摘要，如何提炼，代码是做不了的；
     如果是把摘要全部串在一起，记录一多，备注就非常长，好像也不方便；
2、周报是要分类统计的，你这分类与会计科目之间没有对应关系，代码分不了类别的；
     还有，12/24日这一周的期初是34370.74，可是明细表中12/23日的余额是29595.62，这两个也对不上啊？

沂蒙奇迹

hfwufanhf2006 发表于 2019-12-30 16:49
1、日报感觉是可以统计的，就是不知道“摘要合集”是什么？
     这种流水账，数量可能会很多，一条记录一 ...

1、摘要长一点没有关系，日报我按excel的函数已经实现摘要文本的合并。如果能够用VBA实现相同的要求，最好转化为VBA函数实现
2、  12.24的的期初就是12.23的期末，余额有公式判断，同一天的余额只在最后一条记录显示，其他的显示为零，余额没有错。
3、当前周的函数以当前日期判断本周的起始日期和结束日期，然后以起始日期   i  <=当前日期  x  <=本周结束日期 j  ,判断 i  j  所在的对应行，row(i) ,row(j) ,把row(i),"c":row(i),"n"装入数组，然后根据借方金额和贷方金额列  单元格为非空，判断再次装入数组，然后把此数组的摘要列合并文本，得到收入的摘要合集。按上面的思路，摘要是有顺序的，不过不强求顺序
大体思路是这样，不过不会设置VBA函数循环，初学，感谢