老师，
如保将以下明细表中的数量加总后，填到以下统计表中。每执行一次代码，将结果相应的日期行中。
比如今天是10，就填到10号这一行中，如10号这一行已经有数据存就消除后重新写入。
如今天是11号，就将结果写入11号这一行中。
谢谢。
明细表
| 产品 |
数量 |
组别 |
| A1 |
1 |
A |
| A1 |
1 |
B |
| A1 |
1 |
C |
| A2 |
1 |
A |
| A2 |
1 |
B |
| A2 |
1 |
C |
| A1 |
1 |
A |
统计表：
| 日期 |
A组 |
B组 |
C组 |
加总 |
| 1 |
|
|
|
|
| 2 |
|
|
|
|
| 3 |
|
|
|
|
| 4 |
|
|
|
|
| 5 |
|
|
|
|
| 6 |
|
|
|
|
| 7 |
|
|
|
|
| 8 |
|
|
|
|
| 9 |
|
|
|
|
| 10 |
|
|
|
|
| 11 |
|
|
|
|
| 12 |
|
|
|
|
| 13 |
|
|
|
|
| 14 |
|
|
|
|
| 15 |
|
|
|
|
| 16 |
|
|
|
|
| 17 |
|
|
|
|
| 18 |
|
|
|
|
| 19 |
|
|
|
|
| 20 |
|
|
|
|
| 21 |
|
|
|
|
| 22 |
|
|
|
|
| 23 |
|
|
|
|
| 24 |
|
|
|
|
| 25 |
|
|
|
|
| 26 |
|
|
|
|
| 27 |
|
|
|
|
| 28 |
|
|
|
|
| 29 |
|
|
|
|
| 30 |
|
|
|
|
| 31 |
|
|
|
|
老师，
目前只能完成到这儿，它只能加到当前光标所处的行。
如何使以下结果加入到当前日期所处的行中。比今天是 2023/10/12, 就加到号12行这处。
另外如果12号后面的行，如13号的行，14号的行，15号的行... 上有任何数据的话都清空，谢谢。
Tables("表B").current("A组") = DataTables("表A").Compute("Sum(数量)","组别 ='A'")
Tables("表B").current("B组") = DataTables("表A").Compute("Sum(数量)","组别 ='B'")
Tables("表B").current("C组") = DataTables("表A").Compute("Sum(数量)","组别 ='C'")
Tables("表B").rows(date.today.day - 1)("A组") = DataTables("表A").Compute("Sum(数量)","组别 ='A'")……
清空
Tables("表B").rows(date.today.day)("A组") = nothing
Tables("表B").rows(date.today.day+1)("A组") = nothing
老师
不对哦，日期是以号来记的，如 1,2,3,4 ，不是2023/10/1,2023/10/2.. 这种格式
Tables("表B").rows(date.today.day - 1)("A组") = DataTables("表A").Compute("Sum(数量)","组别 ='A'") |
老师，这个还是有点难，逻辑是不是这样
先判定今天的日期，比如今天是2023-10-13， 就到这个日期中的号 13，然后找到表B中的 日期列 13号行，再将这数据填上，是吗 ？
日期为1是不是表格的第一行？13号是不是第13行？
老师，如下，日期如是1 ，相对应的 就是表B，日期中的 1 这一行，日期是13，就是表B，日期中的 13 这一行
【
日期中的 1 这一行】是不是表格的第一行？如果不是使用Find查询到需要的行