excel 当前时间 怎么每秒更新一次

来源:百度知道 编辑:UC知道 时间:2024/05/28 01:57:00
我想在excel 单元格插入一个当前时间 ,而且这个时间是每秒自动刷新!

菜单:工具-宏-VB编辑器
打开VB编辑器,插入-模块
把下面的代码复制到其中,保存
然后,工具-宏,在弹出的对话框中,选中 宏: 秒表 ,执行!

Sub 秒表()
ActiveSheet.Range("A1").Value = Time
Application.OnTime Time + TimeSerial(0, 0, 1), "秒表", , True
End Sub