插入今天的date与button，作为date，不起作用？

我使用这个VBA：

ActiveCell.FormulaR1C1 = "=NOW()" ActiveCell.Offset(1, 0).Range("A1").Select 

但是单元格的值变成=NOW() ，而不是date。

我想按下button，拿到2015-03-13 ，明天打开表格，应该还是说2015-03-13 。

Answer 1

考虑：

 ActiveCell.Value=Now 

Answer 2

也许你应该考虑：

Ctrl + ：

Answer 3

你的代码ActiveCell.FormulaR1C1 =“= NOW（）”是绝对完美的。 它在我的系统上正常工作。 你不需要到明天才能检查这个代码的输出，先写这个代码然后运行macros并保存并closures它（请检查date）。 closures文件后，改变你的系统date，即假设今天是13三月，然后设置你的系统时间的14三月date，然后打开文件，你会观察date是在变化。 你可以在打开的工作簿事件中写这个Thisworkbook。

Private Sub Workbook_Open（）ActiveCell.FormulaR1C1 =“= NOW（）”End Sub

Private Sub Workbook_Open（）ActiveCell.Value = Now End Sub