Excel日期格式VBA

Question

我使用以下代码将单元格的值设置为当前日期

rng.Value = Format(Now(), "dd/mm/yyyy")
rng.NumberFormat = "dd/mm/yyyy"

当我运行此代码时，日期插入到单元格中，格式为“日期”，但单元格中的数据保持对齐。公式不会将值解释为日期。

当我单击该单元格，然后按Enter时，值将向右移动，并且日期现在适用于公式。

如果我手动输入日期，则公式也将起作用。只有当我使用VBA时。

Answer 1

不要格式化输入，格式化单元格（您可以使用Date）：

rng.Value = Date
rng.NumberFormat = "dd/mm/yyyy"