excel倒计时精确到分钟(Excel如何制作动态倒计时牌)

伙伴们,今年还剩80来天了,加油!

80来天,在Excel中怎么计算精确到秒,并动态更新呢?

excel倒计时精确到分钟(Excel如何制作动态倒计时牌)(1)

步骤:

1、原始数据信息:

excel倒计时精确到分钟(Excel如何制作动态倒计时牌)(2)

(1)单元格A2输入“2021年元旦”,B2中输入2021年1月1日;

(2)单元格A3输入“现在时间”,B3中输入公司“=now()”;

(3)设置B2、B3单元格格式:选择B2、B3单元格,右键“设置单元格格式”,“数字”标签-“分类”框中“自定义”-“类型”框中输入yyyy"年"m"月"d"日"hh"时"mm"分"ss"秒",则B2、B3单元格显示为年、月、日、时、分、秒的数值;

excel倒计时精确到分钟(Excel如何制作动态倒计时牌)(3)

(4)设计A2:B3单元格格式。

2、倒计时牌设计:

excel倒计时精确到分钟(Excel如何制作动态倒计时牌)(4)

(1)合并A5、B5单元格,输入“2021年元旦倒计时”;

(2)合并A6、A7单元格,输入“距离2021年元旦还剩”,并按Alt 回车换行;

(3)设计A5:B7格式。

3、倒计时计算:

(1)天数计算:B6单元格中输入函数“=INT(B2-B3)&"天"”;

(2)时分秒计算:B7单元格中输入函数“=TEXT((B2-B3)-INT(B2-B3),"h时m分s秒")”。

4、动态更新时间:

(1)按Alt F11调出宏编辑器,单击“插入”-“模块”,在弹出的代码编辑区输入下列代码后,退出;

excel倒计时精确到分钟(Excel如何制作动态倒计时牌)(5)

Sub Olympic()

ActiveSheet.Calculate

Application.OnTime Now TimeValue("00:00:01"), "Olympic"

End Sub

5、隐藏第2、第3行原始数据。

※函数释义:

1、Now:返回当前系统日期和时间;

2、Int:取整数;

3、Text:将数值转化为文本格式。

※小贴士:

用VBA编辑器实现动态更新,当重新打开文件后即实时更新倒计时数据。

※源文件获取:

请认准头条号“学习Dream”,关注、点赞、评论、收藏、转发、留邮箱;

^_^注明文章标题^_^

,

免责声明:本文仅代表文章作者的个人观点,与本站无关。其原创性、真实性以及文中陈述文字和内容未经本站证实,对本文以及其中全部或者部分内容文字的真实性、完整性和原创性本站不作任何保证或承诺,请读者仅作参考,并自行核实相关内容。文章投诉邮箱:anhduc.ph@yahoo.com

    分享
    投诉
    首页