一、纯ppt实现倒计时

（一）PPT动画10秒倒计时

（二）PPT插入10秒视频倒计时

（三）PPT编程倒计时天时分秒

二、ppt+倒计时软件

（一）10秒倒计时

（二）倒计时软件

三、ppt、倒计时网页

四、最终实现效果

五、附件

起因：公司半年度冲刺大会有一个倒计时环节（效果为：先10秒倒计时，之后出现距离冲刺竞赛结束还有85天7时25分45秒）。起先想在ppt中实现，后来发现没有“专业人才”能做，后来想用网页实现倒计时，接着ppt超链接跳转。领导觉得跳转打开速度慢且不能打开就是全屏，最后直接分成两块ppt和网页分开播放，主要过程如下：

一、纯ppt实现倒计时

方案一：PPT动画倒计时10秒+PPT编程倒计时天时分秒。

方案二：PPT插入倒计时10秒视频+PPT编程倒计时天时分秒。

拆开来说就是三个部分的实现：动画10秒倒计时、10秒视频倒计时、编程倒计时天时分秒。

（一）PPT动画10秒倒计时

可参考这篇文章，自公众号“利兄日志”引用：

炸裂的倒计时动画，用PPT到底该如何实现？

我只能说是我想要的效果，并且讲的很细致，主要就是数字进入和消失动画效果的排序，掌握这个好像就掌握了很多动画效果，我觉得很有用。

我实现的效果如下：

（二）PPT插入10秒视频倒计时

视频是在B站下载的，其他途径我没试也懒得试。

注意：

1.下载无水印的。

2.B站的视频手机端存储位置为本地存储/Android/data/ tv.danmaku.bili/ download。并且是音视频分开的，想要合并这里引用一个工具，超级详细，如何把B站缓存m4s文件转换成mp4格式，作者是“热心市民小张123”。

3.注意缓存的清晰度。

剪辑工具用的"必剪"。

（三）PPT编程倒计时天时分秒

说实话我对ppt编程是一窍不通的，也弄不清宏和vba和vb之前到底有啥区别和联系，总之百度很强大，同事很乐于助人。

首先，借鉴的是怎么制作倒数100天的倒数计时ppt？这里主要是让我明白了可能要插入哪些控件，以及代码模块的语法结构。

接着，百度到的代码是:

Private Sub TextBox1_Change()
Call Label1_Click
End SubPrivate Sub Label1_Click()
Dim TargetDate As Date '目标时间
Dim DeltT As Double '据目标时间的差值
Dim Days As Double '据目标时间天数
Dim Hours As Double '据目标时间小时数
Dim Minutes As Double '据目标时间分钟数
Dim Seconds As Double '据目标时间秒数
TargetDate = #7/1/2021# '假设目标时间2010国庆
DeltT = TargetDate - Now '获取当前时间与设定时间的时间差，为double类型
Days = Fix(DeltT) '获取天数
Hours = Fix(DeltT * 24 - Days * 24) '获取小时数
Minutes = Fix(DeltT * 24 * 60 - Days * 24 * 60 - Hours * 60) '获取分钟数
Seconds = Fix(DeltT * 24 * 60 * 60 - Days * 24 * 60 * 60 - Hours * 60 * 60 - Minutes * 60) '获取秒数
Label1.Caption = "距离" & TargetDate & "倒计时" & Days & "天" & Hours & "小时" & Minutes & "分钟" & Seconds & "秒"
End Sub

可以实现效果，但是不会自动刷新时间，必须单击一下才变一次。同事帮改了之后，代码是这样的，这里需要插入控件，是一个按钮（具体怎么插入请自行百度ppt如何插入按钮控件）

Private Declare Function timeGetTime Lib "winmm.dll" () As LongPrivate Sub CommandButton1_Click()
Do
delay (1)
Loop Until (6 < 5)
End SubPrivate Sub Label1_Click()
Dim TargetDate As Date '目标时间
Dim DeltT As Double '据目标时间的差值
Dim Days As Double '据目标时间天数
Dim Hours As Double '据目标时间小时数
Dim Minutes As Double '据目标时间分钟数
Dim Seconds As Double '据目标时间秒数
TargetDate = #7/1/2021# '假设目标时间2010国庆
DeltT = TargetDate - Now '获取当前时间与设定时间的时间差，为double类型
Days = Fix(DeltT) '获取天数
Hours = Fix(DeltT * 24 - Days * 24) '获取小时数
Minutes = Fix(DeltT * 24 * 60 - Days * 24 * 60 - Hours * 60) '获取分钟数
Seconds = Fix(DeltT * 24 * 60 * 60 - Days * 24 * 60 * 60 - Hours * 60 * 60 - Minutes * 60) '获取秒数
Label1.Caption = "距离" & TargetDate & "倒计时" & Days & "天" & Hours & "小时" & Minutes & "分钟" & Seconds & "秒"
End SubSub delay(T As Single)
Dim time1 As Single
time1 = Timer
Do
DoEvents
Loop While Timer - time1 < T
Label1_Click
End Sub

当然了我也不知道哪里出了问题，总之秒在变化时总是或间隔2秒或间隔1秒，间歇性抽风，所以这个方案被否了（关键是界面还丑）。实现效果如下：

当时百度不知道为啥，可能搜索方式有问题，我真的没有搜到ppt实现倒计时，今天我换了问法“vba实现倒计时”，竟然搜到了一大堆，列几个我觉得有用的经验分享。（不过我没有测试）
1.10秒倒计时的实现（非动画）
用VBA实现PPT倒计时[Access软件网]
用VBA实现PPT倒计时(2)[Access软件网]
2.PPT+VBA实现计时（倒计时）展示
PPT+VBA实现计时（倒计时）展示_潇湘宇的专栏-CSDN博客_vba倒计时

3.倒计时按钮_有效利用VBA中OnTime方法实现倒计时设计
倒计时按钮_有效利用VBA中OnTime方法实现倒计时设计_樱花霁的博客-CSDN博客

这就是命运呐！但是还是觉得很不错，至少经历了一番明白了vba还能实现这个。

二、ppt+倒计时软件

方案：ppt实现10秒倒计时+倒计时软件

此方案分两部分，即 10秒倒计时、倒计时软件。

（一）10秒倒计时

ppt动画 or ppt的vba编程 or 插入视频都OK。可参考上文。

（二）倒计时软件

这里引用一篇知乎：

有没有一款合适的倒计时软件？

百度搜索“倒计时桌面软件”可能有一大堆。

本来是想在PPT中点击某个按钮，然后触发运行程序，直接让这个软件跳出来，但是，但是结果不尽如人意，首先ppt全屏演示者模式播放时，不能确定软件显示位置，其次领导不喜欢这种方式，变数太多，还不庄重，所以给否了。（如何在ppt中触发exe运行程序请自行百度）

三、ppt、倒计时网页

方案：ppt和倒计时网页分开播放，之前是用一台电脑，一个屏幕，在ppt里播放倒计时。

现在用两个屏幕，一个屏幕只放ppt，另一个用投影仪只放倒计时，还是用一台电脑实现的。

所以说其实我是懵逼的，具体怎么分屏的我还没搞清楚。

事实上我本来想的是，本地做一个倒计时html文件，然后在ppt里实现网页的加载，网上说是可以的，可以参考：如何将html格式动态图表网页嵌入ppt中，Naruto Inspire 的博客-CSDN博客。

问题是我没有成功，主要背景加载不出来（强调一下，我是用视频做动态背景）。

所以还是把网页从PPT中分离出来了。并且，连带着10秒倒计时也放入网页里，不放在PPT里实现了。

此方案分启动倒计时、10秒倒计时、倒计时天时分秒三个阶段，使用网页跳转，需要3个html文件。

这里不介绍网页倒计时是如何实现的了，请大家自行百度”html倒计时模板“，应该大同小异，找一个容易改时间的即可。

我本次方案的倒计时截止时间是2021年7月1日00点00分00秒。

这里把修改html主要的参考文章列出来：

非常详细图文JDK和Tomcat安装和配置的图文教程

tomcat只部署一个index.html文件详解

Html控制视频播放

设置视频水平垂直居中显示在页面上

html：如何让文字位于页面的右下角

视频html代码自动播放怎么改

html插入视频embed自动播放的参数是哪个

HTML5网页自动播放的背景音乐标签调用代码

html视频播放完后跳转

这部分是转载吧，这种引用形式，希望不要喷我，如果大家不满意，那我就删掉，百度也很容易。

四、最终实现效果

目前10秒倒计时可以尝试在360或IE等浏览器上展示，若是没有展示出来可以换一个浏览器试试，没有考虑兼容性。

五、附件

实在没法子了，我把文件共享出来了，只需要调整时间和CSS样式即可。02文件可以单独使用。当然了，大神就不要嘲笑在下了，本次记录到此结束。

https://wwa.lanzoux.com/i4Nivo2takf

倒计时，距离活动还有0天0时0分0秒相关推荐

js倒计时----距离活动结束还有 xx天xx时xx分xx秒
1 <html> 2 <head> 3 <meta charset="UTF-8"> 4 <title>距离活动结束还有 xx天xx ...
oracle 取今日0时,Oracle 取得当天0时0分0秒和23时59分59秒
1. 取得当天0时0分0秒 select TRUNC(SYSDATE) FROM dual; 2. 取得当天23时59分59秒(在当天0时0分0秒的基础上加1天后再减1秒) SELECT TRUNC( ...
java 获取当天0时0分0秒和 23时23分59秒的时间
/*** Purpose:获取当天0时0分0秒的时间* @author Hermanwang* @return* @return Date*/public static String todayFir ...
Js中Date日期的使用（加一天，加一个月，获取0时0分0秒，23时59分59秒等）
代码示例如下:(以当前日期new Date()为例.也可以将例中new Date()换成任意Date对象) 1.获取今天的0时0分0秒(常用于开始日期的获取) var startDate= new D ...
Js中Date日期输出不同结果(格式)（加一天，加一个月，获取0时0分0秒，23时59分59秒等）
代码示例如下:(以当前日期new Date()为例.也可以将例中new Date()换成任意Date对象) 1.获取今天的0时0分0秒(常用于开始日期的获取) var startDate= new D ...
html5在线天数计时器,HTML倒计时效果：天、时、分、秒 | 固定时间倒计时
需求分析: 希望制作一个固定时间倒计时效果,比如某某活动在4小时之后结束,点开网页,触发倒计时事件,开始4小时倒计时.考虑使用setInterval定时器,在时间为0后,clearInterval清除 ...
计算日期时间间隔，可计算情侣计算在一起的。精确到，天，时，分，秒（输入的日期距离现在有：819天19670小时1180221分钟70813262秒）
import java.time.Duration; import java.time.LocalDateTime; import java.time.format.DateTimeFormatter ...
html5在线天数计时器,JS实现动态倒计时功能（天数、时、分、秒）
写在前面: 实现倒计时功能首先是得到目标时间,然后用当前时间减去目标时间,最后将时间差传化为天数.时.分.秒.由于得到的时间不能直接运算,可以采用object.getTime()方法转化成相同类型进行 ...
js根据当前时间和结束时间做倒计时（还有XXX天XXX时XXX分XXX秒）
js根据当前时间和结束时间做倒计时(还有XXX天XXX时XXX分XXX秒),当天,不需要XXX天数,剩余0小时,不需要显示XXX时,剩余0分钟,不需要显示XXX分 1. js方法 2. HTML代码 ...
拿到倒计时秒数转成时：分：秒格式
倒计时功能的需要,从后台拿到服务器剩余的秒数,转化成时:分:秒的格式展示到页面上,时分秒不足两位数时前面补0. /*** 秒数转时:分:秒* @param {Number} time [秒数]*/ ...

倒计时，距离活动还有0天0时0分0秒

一、纯ppt实现倒计时

（一）PPT动画10秒倒计时

（二）PPT插入10秒视频倒计时

（三）PPT编程倒计时天时分秒

二、ppt+倒计时软件

（一）10秒倒计时

（二）倒计时软件

三、ppt、倒计时网页

四、最终实现效果

五、附件

倒计时，距离活动还有0天0时0分0秒相关推荐

最新文章

热门文章