每年四月之后应更改访问报告年份

时间:2019-09-10 04:25:22

标签: ms-access access-vba

会议从每年的四月到三月开始。

该报告需要在该年度的两次报告中分别发布于10月和3月。

在两种情况下,年份均为2019-20

3月的会话将更改,然后年份也将自动更改2020-21

如何解决?

以下表达式在这种情况下不起作用:

Format(Date(),"yyyy-") & Right(Year(Date())+1,2)

2 个答案:

答案 0 :(得分:0)

因此,2019年4月至2020年3月的报告应显示2019-20年。

使用条件IIf:

IIf(Month(Date()) < 3, Year(Date()) - 1 & "-" & Format(Date(),"YY"), Year(Date()) & "-" & Right(Year(Date()) + 1, 2))

使用Date()进行计算的问题是,如果3月的报表在4月1日运行,则计算将是错误的。最好是在开始的一年中引用表格上的文本框。

答案 1 :(得分:0)

这需要对会计年度进行调整,可以这样进行:

=Format(Year(DateAdd("m",-3,Date()))*100+(Year(DateAdd("m",-3,Date()))+1) Mod 100,"0000-00")

这将偏移会计年度的日期以匹配伪日历年,从而使您可以提取任何日历年的年和月。第一年将全额返还并乘以100:201900,第二年的十年部分则加起来:201900 + 20 =201920。最后的格式为破折号:2019-20。