vba - 如何更改格式化日期的语言环境？

Question

我想用英文月份名称以特定格式检索今天的日期。

我正在使用Format(DateValue(Now), "dd-mmm-yyyy") ,
这给了我05-cze-2013 ,
这是波兰语。我想得到的是05-Jan-2013 .

我只对 VBA 解决方案感兴趣。还请提供一种将语言环境设置回原始语言的方法，也使用 VBA。

Answer 1

这不是很困难...

Sub VBA_Dates_Format()
    Cells.Clear
    Range("A1").Value = Now
    Range("A2").Value = Now
    ' Polish
    Range("A1").NumberFormat = "[$-415]d mmm yy;@"
    ' English UK
    Range("A2").NumberFormat = "[$-809]d mmm yy;@"
End Sub

我通过记录和修改宏以符合标准来实现这一点。
Further reading available here