Question

在powerpoint vba应用程序中我想根据当前的拼写检查语言格式化日期（可能与系统区域设置语言相同或不同）。

e.g。 Locale是德语（奥地利），但英文版客户的文件是英文，因此日期格式应为“2015年1月1日”而不是“01.Jänner2015”

我在这个网站上找到了excel的解决方案： How to change the locale of a formatted date?

在powerpoint vba中尝试相同的技术似乎不起作用：

debug.print format (now(), "[$-415] MMMM")
 Jänner

debug.print format (now(), "[$-809] MMMM")
 Jänner

debug.print format (now(), "[any old rubbish] MMMM")
 Jänner

- ＆GT; vba忽略方括号中的任何内容。

如何在VBA中获得相同结果的任何建议？

Answer 1

遇到了同样的问题，很难找到解决方案，所以我来回答这个老问题：

使用 工具 > 参考 > Microsoft Excel 16.0 对象库（或您当前的 Excel 版本，可能是 12.0 或 14.0）激活 Excel 库 Menu entrance Activate Microsoft Excel 16.0 Object Library

然后就可以使用这个Excel WorksheetFunction：

Debug.Print WorksheetFunction.Text(Now, "[$-409]MMMM")

您甚至可以使用其他参数（例如不同的日历）指定它，可以在此处找到区域设置代码列表：https://stackoverflow.com/questions/54134729

如何在Powerpoint VBA中更改格式化日期的区域设置

1 个答案: