Excel 单元格里的时间,如何让它开始动起来,变成时钟?

文摘   科技   2024-09-08 11:01   上海  

公众号平台最新的推送规则对技术类文章不太友善,如果不想错过干货,请务必 “设为星标”哦!!!


点击上方蓝字 --> 点击“...”--> 选择“设为星标


在 Excel 中,如何让时间动起来?自动计时或倒计时?


今天就教大家用最简单的方法实现效果。


案例:


制作如下图所示的自动计时的时钟。


解决方案:


先在 Excel 中用公式设置时间。


1. 在 A1 单元格中输入“=NOW()


这个公式比较简单,就是计算现在的时间,默认情况下,仅精确到分钟,我们需要设置为精确到秒才能看得到时间的动态变化。


2. 选中 A1 单元格 --> 按 Ctrl+1 --> 在弹出的对话框中选择“数字”选项卡 --> 在当前自定义的格式后面加上“:ss”,使得整段格式变成“yyyy/m/d h:mm:ss”


虽然时间已经精确到了秒,但是此时的时间是不会动的,我们还需要用 VBA 简单设置一下。


3. 按 Alt+F11 --> 在弹出的 VBE 窗体中选择“插入模块”-->“模块”


4. 在右侧的窗体中输入以下代码:


Sub aaa()    Calculate '对公式进行重新计算  Application.OnTime Now + TimeValue("00:00:01"), "aaa" '表示从现在开始,之后每秒运行一次"aaa"End Sub


5. 关闭 VBE --> 将 Excel 保存为 .xlsm 格式的文件


6. 打开这个文件,按 Alt+F11 --> 按 F5 --> 关闭 VBE,单元格中的时间就以每秒为单位,自动开始计时。


7. 如果要停止计时,可以按 Alt+F11 --> 选择菜单栏的“中断” --> 关闭 VBE,时间就静止了。


8. 如果要设置倒计时时间,比如,离 9 月 1 日开学还有多少天,可以将 A1 单元格的公式修改为:

="2021/9/1"-NOW()


但此时的格式很奇怪,差额变成了日期格式,需要重新设置一下。


9. 选中 A1 单元格 --> 按 Ctrl+1 --> 在弹出的对话框中选择“数字”-->“自定义”--> 在“类型”区域输入以下类型 --> 点击“确定”:

d天h小时m分s秒


现在再运行 VBA,时间就开始自动倒计时。同学们,时间宝贵,请不负韶华。


转发、点赞、在看也是爱!

Excel学习世界
你遇到的所有 Excel 坑,我都帮你趟过了。
 最新文章