作者:帮家丶韩少--力顶7752 | 来源:互联网 | 2023-09-16 10:22
伙伴们秒表宏设置,今年还剩80来天了,加油!
80来天秒表宏设置,在Excel中怎么计算精确到秒,并动态更新呢?
步骤:
1、原始数据信息:
(1)单元格A2输入“2021年元旦”秒表宏设置,B2中输入2021年1月1日;
(2)单元格A3输入“现在时间”秒表宏设置,B3中输入公司“=now()”;
(3)设置B2、B3单元格格式:选择B2、B3单元格秒表宏设置,右键“设置单元格格式”,“数字”标签-“分类”框中“自定义”-“类型”框中输入yyyy"年"m"月"d"日"hh"时"mm"分"ss"秒",则B2、B3单元格显示为年、月、日、时、分、秒的数值;
(4)设计A2:B3单元格格式秒表宏设置。
2、倒计时牌设计:
(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调出宏编辑器秒表宏设置,单击“插入”-“模块”,在弹出的代码编辑区输入下列代码后,退出;
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”秒表宏设置,关注、点赞、评论、收藏、转发、留邮箱;
^_^注明文章标题^_^