【发布时间】:2012-07-15 12:49:09
【问题描述】:
我希望能够通过单击按钮将时间戳添加到 Excel 单元格。不幸的是,=Now() 总是会更新到当前时间,因此不是静态的。
我可以在记事本中做F5,然后转移到excel,但我宁愿去掉中间人。
谢谢。
【问题讨论】:
我希望能够通过单击按钮将时间戳添加到 Excel 单元格。不幸的是,=Now() 总是会更新到当前时间,因此不是静态的。
我可以在记事本中做F5,然后转移到excel,但我宁愿去掉中间人。
谢谢。
【问题讨论】:
在单元格旁边创建一个按钮。
然后对于该按钮的“onclick”事件中的 VBA 代码,请执行以下操作:
Sheets("Sheetname").Range("C1").value = time()
或日期和时间
Sheets("Sheetname").Range("C1").value = Now()
无论哪种方式,只有在单击按钮时,该单元格的值才会设置为当前时间。
注意:
如果您从未在 Excel 中插入过按钮对象,这里是 Excel 2003、2007 和 2010 的分步指南
http://www.excel-vba-easy.com/vba-how-to-create-macro-excel.html#create-macro-excel-2003
更新:
如果您只想将时间戳添加到当前选定的单元格,请使用以下代码行:
ActiveCell.value = Now()
【讨论】:
如果你只使用 Ctrl+Shift+,你可能真的不需要按钮:帮助说 Ctrl+:但不要忘记使用 Shift 来获得它。
【讨论】:
ctrl+; 输入日期,ctrl+shft+; 输入时间。
我所见过的例子都没有真正简单地按照要求做。 (注意使用 Excel 2010)
这是一个简单的宏。我保存了启用的工作表宏,并添加了一个快速访问工具栏按钮来运行它。
Sub MyTimeStamp()
Dim DT
'
' MyTimeStamp Macro
'
' Keyboard Shortcut: Ctrl+t
'
DT = Format(Now, "mm/dd/yyyy hh:mm:ss AM/PM")
ActiveCell.Select
Selection.NumberFormat = "mm/dd/yyyy hh:mm AM/PM"
ActiveCell.Value = DT
End Sub
【讨论】: