1、最终想要输出的报表样式合同号 2019年4月 2019年10月 2020年4月 2020年10月 2021年4月 2021年10月
指标1 指标2 指标1 指标2 指标1 指标2 指标1 指标2 指标1 指标2 指标1 指标2
A001 100 102 200 202 201 200 200 100 203 100 20 30
……
其中:4月份或10月份,对应的同一个指标的筛选条件基本类似,
例如:2021年4月,对应的筛选条件filter如下:
Dim dt1 As New Date(2021, 4, 1)
Dim dt2 As New Date(2021, 1, 1)
Dim dt3 As New Date(2021, 6, 30)
Dim dt4 As New Date(2020, 10, 1)
Dim dt5 As New Date(2020, 12, 31)
Dim filter1 As String="(合同开始日期 < '" & dt1 & "' And 应结转日期1 >= '" & dt2 & "' And 应结转日期1 <= '" & dt3 & "')"
Dim filter2 As String="(合同开始日期 >= '" & dt4 & "' and 合同开始日期 <= '" & dt5 & "' And 应结转日期1 >= '" & dt4 & "' And 应结转日期1 <= '" & dt5 & "')"
Dim s3 As String="短租"
Dim filter3 As String="租赁类别 Like '%" & s3 & "%'"
Dim filter As String="(" & filter1 & " Or " & filter2 & ")" & " And " & filter3
2022年4月对应的筛选条件,将红色的2021年变成2022年,将绿色的2020年变成2021年即可。
2、我的思路:按照4月和10月按照不同的指标分别进行交叉统计,之后再进行结果的拼接。即:先进行4月份,指标1的交叉统计;再进行4月份,指标2的交叉统计……;之后将多个结果进行拼接。
3、问题:
(1)交叉统计的表头,怎么按照2019年4月 2020年4月 2021年4月 ……进行统计啊?
(2)不同的交叉统计结果,如何拼接啊?
[此贴子已经被作者于2021/12/2 9:58:16编辑过]