由于Windows区域设置（我认为），VBA格式日期不起作用

Question

所以我试试这个：

gestern = Format(WorksheetFunction.WorkDay(Date, -1), "DD/MM/YYYY")

...而不是DD/MM/YYYY我得到DD.MM.YYYY。

我认为它与我的Windows上的区域设置有关 - 它们现在已经在德国设置了。它指出日期的默认格式为DD.MM.YYYY。所以我认为这是我的问题的原因。但我无法将其改回英语，因为我的其他一些宏不再正常运行了。此外，我没有看到一个选项也添加替代日期格式。

有关如何在不更改Windows区域设置的情况下以DD/MM/YYYY格式获取昨天日期的任何想法？谢谢！

Answer 1

您必须转义/字符，以便它不会被Format视为日期分隔符。要转义它，请使用\字符：

gestern = Format(WorksheetFunction.WorkDay(Date, -1),"DD\/MM\/YYYY")