阿力头条网

在日常生活和工作中，我们经常会应用一些倒计时来增强自己的紧迫感或兴奋感，例如距高考还有N天、距项目结束还有N天、下班还有N小时，距离下一个周末还有N天……今天就给大家分享一个实用又好玩的技巧：在Excel中制作具有动态效果的“倒计时”！接下来，我们就以周末倒计时为例，进行示例讲解。

设置天数

从周三开始计算，周六的日期为2021年8月28日，在B2单元格内输入公式：

=INT("2021-8-28"-NOW())&"天"，即可显示当天距离周末的天数。

设置时间

在设置具体的时间几分几秒之前，我们要先设置C2单元格格式，将其设置为自定义格式：【hh小时mm分ss秒】。

1、选中C2单元格，鼠标右击选择【设置单元格格式】；

2、选择【数字】-【自定义】，在类型一栏输入：【hh小时mm分ss秒】，点击确定；

3、在C2单元格中输入公式：【="2021-8-28"-NOW()】，即可显示此时此刻距离周末的时间。

添加VBA代码

做完这些步骤，我们有了具体的天数和时间，但是这个天数和时间却还无法自动刷新。为什么呢？这是因为NOW函数属于易失性函数，如果在工作表中没有执行能够引发重新计算的操作，公式结果并不能自动实时刷新，因此，在这里我们需要添加一个定时刷新的VBA代码。具体操作如下：

1、VBA代码也就是Visual Basic的一种宏语言。在WPS的Excel中，我们可以点击【开发工具】-【WPS宏编辑器】，打开宏编辑器，然后依次点击【插入】-【模块】；

2、在左侧【工程】栏的【Project】里，双击刚插入的【Module1】，在右侧的代码窗口输入以下代码：

Sub Macro1()

Application.onTime Now + Timevalue("00:00:01"),"Macro1"

Calculate

End Sub

Private Sub workbook_open()

Macro1

End Sub

3、选择【Workbook】，并输入以下代码，再按【F5】键即可可以实现倒计时效果：

Private Sub workbook_open()

Call Macro1

End Sub

4、最后将文件保存为【Microsoft Excel启用宏的工作簿】，即xlsm格式。

俗话说“一寸光阴一寸金，寸金难买寸光阴”，时间对于每个人来说都很宝贵。当我们看着时间一点一点的消失，是不是会更有紧迫感或兴奋感呢？用这样的倒计时效果也能提醒我们不要浪费时间，为下一刻做好准备。以上就是Excel中如何制作倒计时效果的教程，大家是不是觉得又好玩又实用呢？那就赶紧快学起来吧！