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

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

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

图片[1] | Excel 单元格里的时间,如何让它开始动起来,变成时钟? | 星尘资源网

图片[2] | Excel 单元格里的时间,如何让它开始动起来,变成时钟? | 星尘资源网

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

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

案例:

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

图片[3] | Excel 单元格里的时间,如何让它开始动起来,变成时钟? | 星尘资源网

图片[4] | Excel 单元格里的时间,如何让它开始动起来,变成时钟? | 星尘资源网

解决方案:

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

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

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

图片[5] | Excel 单元格里的时间,如何让它开始动起来,变成时钟? | 星尘资源网

图片[6] | Excel 单元格里的时间,如何让它开始动起来,变成时钟? | 星尘资源网

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

图片[7] | Excel 单元格里的时间,如何让它开始动起来,变成时钟? | 星尘资源网

图片[8] | Excel 单元格里的时间,如何让它开始动起来,变成时钟? | 星尘资源网

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

图片[9] | Excel 单元格里的时间,如何让它开始动起来,变成时钟? | 星尘资源网

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

图片[10] | Excel 单元格里的时间,如何让它开始动起来,变成时钟? | 星尘资源网

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

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

图片[11] | Excel 单元格里的时间,如何让它开始动起来,变成时钟? | 星尘资源网

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

图片[12] | Excel 单元格里的时间,如何让它开始动起来,变成时钟? | 星尘资源网

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

图片[3] | Excel 单元格里的时间,如何让它开始动起来,变成时钟? | 星尘资源网

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

图片[14] | Excel 单元格里的时间,如何让它开始动起来,变成时钟? | 星尘资源网

图片[15] | Excel 单元格里的时间,如何让它开始动起来,变成时钟? | 星尘资源网

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

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

图片[16] | Excel 单元格里的时间,如何让它开始动起来,变成时钟? | 星尘资源网

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

图片[17] | Excel 单元格里的时间,如何让它开始动起来,变成时钟? | 星尘资源网

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

d天h小时m分s秒

图片[18] | Excel 单元格里的时间,如何让它开始动起来,变成时钟? | 星尘资源网

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

图片[19] | Excel 单元格里的时间,如何让它开始动起来,变成时钟? | 星尘资源网

图片[4] | Excel 单元格里的时间,如何让它开始动起来,变成时钟? | 星尘资源网

© 版权声明
THE END
喜欢就支持一下吧
点赞12 分享
评论 抢沙发
头像
欢迎您留下宝贵的见解!
提交
头像

昵称

取消
昵称表情代码图片

    请登录后查看评论内容