短日期的数字格式代码是什么?

时间:2015-01-19 08:44:08

标签: vba excel-vba excel

我知道我可以编写以下内容来将数字格式化为具有yyyy-mm-dd外观的日期:

Range("A1").NumberFormat = "yyyy-mm-dd"

我知道我也可以写:

Range("A1").NumberFormat = "m/d/yyyy"

以及各种各样的事情。

但有没有办法可以将数字格式设置为一般的短日期,并将其留给用户的系统来决定确切的外观?

我正在寻找一个像:

这样的表达方式
Range("A1").NumberFormat = "Short Date" '(<-This does not work)

2 个答案:

答案 0 :(得分:8)

这有点棘手。如果您查看单元格的属性,格式选项卡,类别日期,您将看到一些以星号(*)开头的格式,这些格式会响应用户区域设置的更改。尝试将单元格设置为第一个元素,短日期,然后使用?activecell.NumberFormat在即时窗口中获取其numberformat值。您会看到它是"m/d/yyyy",因此您的代码段可以很好地完成工作。只需尝试在控制面板中更改区域设置,单元格的格式就会相应更改。

答案 1 :(得分:-4)

请试试这个

 Format(Range("A1"), "Short Date")

它将返回系统短日期值。