用now();在Excel中缺乏定时器,这个不断刷新功能难以实现。可以通过考察单元格选择是否改变,工作表是否激活或改变来设置一次时间,如,在单元格选择变化时改变时间:Private Sub Worksheet_SelectionChange(ByVal Target As Range)Application.EnableEvents = FalseCells(1, 1) = Now()Application.EnableEvents = TrueEnd Sub 0
使用公式即可:在单元格内输入=now()后回车,该单元格即显示当前日期和时间。