excel倒计时函数，精确到小时或者分钟，最好能动态显示，谢谢

Question

如题所述

Answer 1

实现步骤如下：

1、在任意单元输入如下公式

=TEXT((TIME(22,10,10)-MOD(NOW(),1)),"hh:mm:ss")

time(22,10,10)为设定的倒计时时间

2、实现动态显示（宏）

ALT+F11进入VBA编辑器 插入-类模块 在代码框输入如下代码

Option Explicit

Dim NextTick

Sub UpdateClock()

ThisWorkbook.Sheets(3).Calculate

NextTick = Now + TimeValue("00:00:01")

Application.OnTime NextTick, "UpdateClock"

End Sub

Sub StopClock()

    On Error Resume Next

    Application.OnTime NextTick, "UpdateClock", , False

End Sub

ThisWorkbook.Sheets(3).Calculate  自动重算 （3）代表你存放在哪个表，可修改，如果你放在SHEET1将期修改为（1）即可

3、插入两个按钮

1）开始倒计时 - 指定宏“UpdateClock”

2）停止倒计时 - 指定宏“StopClock”

效果如图：

Answer 2

在单元格中输入“=TIME(22,10,10)-MOD(NOW(),1)”
TIME后的内容是倒计时的停止时间，
NOW返回当前时间
按F9更新。