使用按钮插入今天的日期,作为日期,不是功能?

时间:2015-03-13 12:17:59

标签: excel excel-vba excel-formula vba

我使用这个VBA:

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

但是单元格的值变为=NOW(),而不是日期。

我想按下按钮并获取 2015-03-13 ,当我明天打开工作表时,仍然应该说 2015-03-13 。< / p>

3 个答案:

答案 0 :(得分:4)

也许你应该考虑:

控制 +

答案 1 :(得分:1)

考虑:

ActiveCell.Value=Now

答案 2 :(得分:0)

您的代码ActiveCell.FormulaR1C1 =&#34; = NOW()&#34; 绝对是完美的。它在我的系统上正常工作。你不需要直到 明天检查此代码的输出,首先编写此代码并运行宏并保存并关闭它(请检查日期)。关闭文件后更改系统日期,即假设今天是13-Mar然后设置系统时间的14-Mar日期然后打开文件,您将观察日期是否发生变化。 你可以在开放的工作簿活动中写这个Thisworkbook。

Private Sub Workbook_Open() ActiveCell.FormulaR1C1 =&#34; = NOW()&#34; 结束子

Private Sub Workbook_Open()     ActiveCell.Value =现在 结束子