如何在EXCEL中设置小时倒计时（怎么用excel设置自动倒计时）

Sub 倒计时() [a1].NumberFormatLocal = "h:mm:ss;@" [a1] = [a1] - 1 / 3600 / 24 '减去1秒 If [a1] 0 Then Application.OnTime Time + TimeSerial(0, 0, 1), "sheet1.倒计时", , True '每过一秒调用本程序一次 Else [a1] = "00:00:00" End If End SubALT+F11，双击右边sheet1后粘贴代码。最好建一命令按钮，单击开始运行Sheet1.倒计时。

Private Sub CommandButton1_Click()Sheet1.倒计时End Sub