verilog60秒倒计时代码_Excel如何制作动态倒计时牌,精确到天、时、分、秒

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

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

c4b19b0c320a6ab4de85e52b7c17c040.png

步骤:

1、原始数据信息:

5974c620d53780d5b66fca645d602514.gif

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

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

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

8e29281761ac5b46c62facd8cd0b609f.gif

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

2、倒计时牌设计:

1e35a2e80abd40acf57006afffb69885.gif

(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调出宏编辑器,单击“插入”-“模块”,在弹出的代码编辑区输入下列代码后,退出;

97bbdc2969c3a9b124372a17f4d36e39.gif

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”,关注、点赞、评论、收藏、转发、留邮箱;

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

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值