excel中用公式制作倒计时：Excel制作倒计时牌 3步搞定 让你秒变大神

excel中用公式制作倒计时：Excel制作倒计时牌 3步搞定 让你秒变大神End SubCalculate2、在右侧的代码窗口中输入以下代码Sub Macro1()Application.OnTime Now TimeValue("00:00:01") "Macro1"

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

这是因为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格式，下次打开时就像开头的效果图一样啦

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

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

关注@office研习社 每天陪你学习一点点，进步一点点。