下班倒计时怎么设置（3步搞定）

给大家分享一个实用好玩的技巧，在Excel中制作倒计时牌，下面就来一起学学吧！

先上效果图：

在日常工作中，经常会有一些倒计时的应用，例如距高考还有N天、距项目结束还有N天、下班还有N小时，更重要的是下一个周末还有N天就到。

下面开始步骤拆解。

因为我从周一开始计算的，周末的日期为2020年5月30日0时，所以在C2单元格输入以下公式，得到剩余的整数天数。

【=INT("2020-5-30"-NOW())&"天"】

在设置具体的时间前，我们先要设置一下单元格格式。

设置D2单元格自定义格式为：【hh小时mm分ss秒】

然后在D2单元格中输入以下公式：【="2020-5-30"-NOW()】

此时，有了具体的时间，但是时间并不会自动刷新。

这是因为NOW函数属于易失性函数，如果在工作表中没有执行能够引发重新计算的操作，公式结果并不能自动实时刷新，因此需要添加定时刷新的VBA代码。

添加VBA代码：
1、按住【Alt F11】，打开VBA编辑器，依次点击【插入】-【模块】，并且选中双击左侧【VBAProject】项目工程里我们刚插入的【模块1】

2、在右侧的代码窗口中输入以下代码

Sub Macro1()

Application.OnTime Now TimeValue("00:00:01"),"Macro1"

Calculate

End Sub

Private Sub workbook_open()

Macro1

End Sub

3、在左侧【VBAProject】项目工程双击【ThisWorkbook】，并在右侧弹出的窗口输入以下代码，然后按【F5】键就可以实现倒计时效果。

Private Sub workbook_open()

Call Macro1

End Sub

最后一步将文件保存为Excel启用宏的工作簿，即xlsm格式，下次打开时就像开头的效果图一样啦

看完上面的教程是不是觉得实用又好玩，看着时间一点一点减少，周末到来就越来越近。

以上就是今天分享的干货技巧，你学废了吗？

关注 每天陪你学习一点点，进步一点点。