PPT代码片段合集
批量操作
批量添加固定元素
批量删除固定元素
批量删除所有动画
图片批量变成灰色
批量取消文本加粗
待整理分类
将PPT拆分成单页
将PPT的页面逆序
PPT勾选交互效果
活动开始倒计时
随机抽奖或随机点名
制作指定月份的日历
循环放映时隐藏部分页面
只给未隐藏的页面添加页码
生成多等分的圆环
在奇偶页插入不同页脚
倒计时到特定日期
跳转到随机页面
随机打乱指定页面的顺序
跳转上一页与下一页
一键关闭所有插件
公众号：自律的音律
-
+
首页
跳转到随机页面
> 在做 PPT 交互触发时，偶尔需要点击按钮跳转到随机页面，可以用这段代码来实现。 先在代码编辑器中粘贴如下代码，并修改需要随机跳转的页面范围。 **代码如下：** ```vb Sub 跳转随机页面() '在 2-6 页之间随机跳转，可以自行修改下面的页码' Const iStart As Integer = 2 Const iEnd As Integer = 6 Dim Inum As Integer Randomize Do Inum = Int((iEnd - iStart + 1) * Rnd + iStart) Loop Until Inum <> ActivePresentation.SlideShowWindow.View.CurrentShowPosition ActivePresentation.SlideShowWindow.View.GotoSlide (Inum) End Sub ``` 设置完成后，插入一个元素并在动作设置中绑定宏`跳转随机页面`，之后将这个带有动作的元素按钮复制到所需的页面，放映 PPT 时点击该元素即可随机跳转到其他页面。
音律
2022年5月17日 21:54
1 条评论
转发文档
收藏文档
上一篇
下一篇
评论
手机扫码
复制链接
手机扫一扫转发分享
复制链接
Markdown文件
PDF文档
PDF文档（打印）
分享
链接
类型
密码
更新密码