用EXCEL制作“倒计时器 添加链接描述 b = Now() + a '计算结束时间 [c3] = Format(b, “yyyy-m-d h:mm:ss”) '设置单元格格式添加链接描述 Call 计时 End Sub Sub 停止() On Error Resume Next Application.OnTime n, “计时”, , False '停止任务的执行 End Sub