我们可以在Excel上运用VBA来制作倒计时牌,下面来介绍一下具体步骤
工具/原料
Excel2013
方法/步骤
2
插入→模块
3
在模块区输入以下代码:Sub 倒计时()Dim t As Variantt = TimerDo While Cells(5, 3) > 0'DoEventsIf Timer - t > 1 Thent = Timer:Cells(5, 3) = Cells(5, 3) - TimeValue('00:00:01')End IfLoopEnd Sub
4
开发工具→插入
5
插入表单控件(按钮)
6
在C5单元格输入一个起始时间,然后点击按钮.最后效果如下
下一篇:「WPS」日期倒计时