首页 威武短视频文章正文

如何制作倒计时视频 :excel制作倒计时带天时分秒?

威武短视频 2022年07月26日 12:39 222 威武短视频

如何用Excel制作随时跳动的倒计时2007年06月24日 下午 01:04 以制作2008北京奥运会倒计时为例:启动Excel并新建工作簿,按下Alt+F11进入VBA编辑状态。在左侧的"工程资源管理器"中选择当前工作簿,然后执行"插入"-"模块"命令,插入一个新模块(模块1)。双击"模块1"进入代码编辑区域中,输入以下代码。输入完成后,关闭窗口返回工作表中。Sub Timer()ss=DateDiff("s", Now, "2008-8-8 20:00:00")dd=ss\86400ss=ss-dd*86400hh=ss\3600ss=ss-hh*3600mm=ss\60ss=ss-mm*60ActiveSheet.Range("A1") = "现在离北京2008奥运会开幕还有" & vbCrLf & dd & "天" & hh & "小时" & mm & "分钟" & ss & "秒"Application.OnTime Now + TimeValue("00:00:01"), "Timer"End Sub按下Alt+F8展开"宏"对话框,选中"Timer"宏,单击"执行"按钮返回,当前工作表的A1单元格中即刻出现一个北京奥运的倒计时钟

如何制作倒计时视频
:excel制作倒计时带天时分秒?

发表评论

备案号:陕ICP备2022006270号-2 网站地图强力收录 威武短视频