实现步骤如下:
1、在任意单元输入如下公式
=T来自EXT((TIME(22,10,10)-MOD(NOW(),1)),"hh:mm:ss")
time(22,10,10)为设定的倒宽试七兴计时时间
2、实现动态显示(宏)
ALT+F11进入VBA编辑器 插入-类模块 在代码框输入如下代码
Option Explici与季握措对亲何日席油风t
Dim NextTick
Sub UpdateClock()
***.sheets(3).Calculate
NextTick = Now + TimeValue("00:00:01")
***.ontime NextTick, "UpdateClock"
End Sub
Sub StopClock()
On Error Resume Next
哗则 ***.ontime NextTick, "UpdateClock", , False
End Sub
***.sheets(3).Calculate 自动重算 乱岁棚(3)代表雀喊你存放在哪个表,可修改,如果你放在SHEET1将期修改为(1)即可
3、插入两个按钮
1)开始倒计时 - 指定宏“UpdateClock”
2)停止倒计时 - 指定宏“StopClock”
效果如图: