多语言展示
当前在线:1607今日阅读:23今日分享:25

Excel如何制作倒计时牌?

我们可以在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单元格输入一个起始时间,然后点击按钮.最后效果如下

推荐信息