Excel制作倒计时牌，仅需三步你就可以搞定他，让你从此秒变大神

Hi，大家好，本专栏将会从零开始和大家用图文的方式，30天让你从不会到熟练使用函数，0基础开始学习Excel函数，让你喜欢上它！有兴趣的小伙伴可以持续关注我，或者在专栏进行查看学习，愿与君携手共进！

最近有小伙们在说如何在Excel制作动态的倒计时牌，因为自己想看着时间一点点的减少，但是心里却对某个人的思念却越来越强烈……哈哈，这个是不是说的就是你呀！

好啦！其实在我们的日常工作中，在某些场合的时候，我们会对倒计时牌有需求。如我们最最常见的距高考还有多少天？但是我们如果想制作动态的倒计时牌，我们就需要使用Excel中的日期函数，然后让VBA代码刷新，这样我们即可制作出倒计时牌。具体制作步骤如下：

Step-01   临近国庆节，相信大家都蠢蠢欲动了吧！那么我们就将假期结束日期为2019年10月1日0时，在C3单元格输入以下公式，得到剩余如下所示的天数。

=INT("2019-10-1"-NOW())&"天"

 我们说说这个函数公式的含义：里面的"2019-10-1"-NOW()，意思就是我们制定的日期减去现在的时间，NOW（）返回的是现在的时间，然后在利用INT进行取整，最后用连接符&和天进行连接。

Step-02  D3单元格中输入以下公式：="2019-10-1"-NOW()，得到我们的小时、分、秒等数据。当然你需要设置单元格的格式为小时分秒，即hh小时mm分ss秒。完成以后如下所示：至此我们可以初步看到达成了一个效果，但是这个数据却没有进行刷新，因此我们还需要让他进行刷新。从而得到倒计时的功能。

Step-03我们都肯定知道虽然NOW函数属于易失性函数，但是在工作表自带函数中没有执行能够自动重新计算刷新的操作，这个的结果并不能自动刷新变更。所以在这个时候我们就可以使用VBA工作表事件，让他们进行自动刷新。

在模块中输入如下代码，如下图所示：

Sub Macro1()
   Application.OnTime Now + TimeValue("00:00:01"),"Macro1"
    Calculate
End Sub

然后在我们工作表中的【工程资源管理器】中的 “ThisWorkbook”，在右侧的代码窗口中输入以下代码，然后按F5键，即可在单元格中实现倒计时效果。

Private Sub workbook_open()
Macro1
End Sub

制作完成之后，就可以看到如下所示的刷新效果啦！小伙们你也试试看，或许你思念的那个人正在想着你啦！

好啦！快乐的时间总是非常短暂的，又到了和大家说再见的时候，如果大家感觉本文如果对你有所帮助的话，请帮忙转发点赞，谢谢您能观看到现在