当操作系统区域设置为英国时，Excel vba将日期转换为其他格式

Question

在Excel VBA中，我将硬编码日期分配给命名范围，如下所示：

 Worksheets("Main").Range("Effectivedate").Value ="11/12/2018"

这是通过单击按钮触发的。 现在，我拥有英国的系统文化。 当我单击按钮时，单元格上填充的值是“ 12/11/2018”。 如果我将文化更改为美国，那么它将填充为“ 11/12/2018”。

由于我的应用程序已在美国和英国国家/地区使用，因此我想知道是否有一种方法可以在不格式化的情况下将日期指定为该单元格。

Answer 1

我建议使用像这样的模棱两可的数据格式（“ yyyy-mm-dd”）

"2018-12-11"

您是否可以尝试：

Option Explicit

Sub test()
    With Worksheets("Main").Range("Effectivedate")
        .Value = 43445
        .NumberFormat = "dd/mm/yyyy"
    End With
End Sub