Win10安装后DateSerial vba停止工作

Question

我在excel vba中有一些代码可以使用DateSerial函数对数据进行排序。

换句话说，我有一个日期（例如07.04.2019），然后在下面的代码中检查该日期是否可以继续进行。

不幸的是，安装win10后代码无法正常工作……也许有人知道如何重建它？

ElseIf trdate >= DateSerial("2019", "03", "10") And trdate < DateSerial("2019", "04", "10") Then