登录  /  注册
首页 > 专题 > excel > 正文

Excel实例详解之倒计时

WBOY
发布: 2022-12-07 17:03:01
转载
3936人浏览过

本篇文章给大家带来了关于excel的相关知识,其中主要介绍了怎么制作一个倒计时牌的相关内容,下面一起来看一下,希望对大家有帮助。

Excel实例详解之倒计时

相关学习推荐:excel教程

在日常工作中,经常会有一些倒计时的应用,例如常见的距高考还有n天、距项目结束还有n天等。使用Excel中的日期函数结合强制刷新的VBA代码,就能制作出倒计时牌。

先来看效果:

+1.gif

接下来一起看看具体的操作步骤:

步骤1 假设假期结束日期为2022年9月14日0时,在C2单元格输入以下公式,得到剩余的整数天数。

=INT("2022-9-14"-NOW())&"天"
登录后复制

步骤2 设置D2单元格自定义格式为:

hh小时mm分ss秒

01.jpg

然后在D2单元格中输入以下公式:

="2022-9-14"-NOW()
登录后复制

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

步骤3 按组合键打开VBE编辑器,依次单击【插入】→【模块】命令,在【工程资源管理器】中单击选中刚刚插入的“模块1”,在右侧的代码窗口中输入以下代码。

Sub Macro1()
Application.OnTime Now + TimeValue("00:00:01"),"Macro1"
Calculate
End Sub
Private Sub workbook_open()
Macro1
End Sub
登录后复制

02.jpg

代码中的”00:00:01″,表示刷新时间为1秒,实际使用时可根据需要设置。例如要设置刷新时间为1分钟,可将此部分修改为”00:01:00″。

步骤4 在【工程资源管理器】中单击选中“ThisWorkbook”,在右侧的代码窗口中输入以下代码,然后按F5键,即可在单元格中实现倒计时效果。

Private Sub workbook_open()
Call Macro1
End Sub
登录后复制

03.jpg

+2.gif

最后将文件保存为Excel启用宏的工作簿,即xlsm格式。

再次打开文件时,如果出现如图 所示的安全警告,记得要点击【启用内容】按钮哦。

04.jpg

制作完成之后,你就可以打开Excel,看着时间一点点的减少,对某个人的思念也越来越强烈……

相关学习推荐:excel教程

以上就是Excel实例详解之倒计时的详细内容,更多请关注php中文网其它相关文章!

智能AI问答
PHP中文网智能助手能迅速回答你的编程问题,提供实时的代码和解决方案,帮助你解决各种难题。不仅如此,它还能提供编程资源和学习指导,帮助你快速提升编程技能。无论你是初学者还是专业人士,AI智能助手都能成为你的可靠助手,助力你在编程领域取得更大的成就。
来源:Excel Home网
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系admin@php.cn
最新问题
热门教程
更多>
最新下载
更多>
网站特效
网站源码
网站素材
前端模板
关于我们 免责申明 意见反馈 讲师合作 广告合作 最新更新
php中文网:公益在线php培训,帮助PHP学习者快速成长!
关注服务号 技术交流群
PHP中文网订阅号
每天精选资源文章推送
PHP中文网APP
随时随地碎片化学习
PHP中文网抖音号
发现有趣的

Copyright 2014-2024 https://www.php.cn/ All Rights Reserved | php.cn | 湘ICP备2023035733号