ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 1234|回复: 10

[求助] 在当前页面点击文本按钮随机复制粘贴图片

[复制链接]

TA的精华主题

TA的得分主题

发表于 2023-3-17 16:10 | 显示全部楼层 |阅读模式
需求:想实现在当前页面点击文本框按钮随机复制放置图片页(最后一页)上的一张图片到当前页,并出现恭喜&“文本按钮上的名字”获得礼品一份,在当前页面停留2秒后消失,我做了个样子图片可以复制到当前页面放大更好,但停留2秒消失不会设置,还有出现恭喜&“文本按钮上的名字”获得礼品一份不会弄,随机复制图片不会弄。请教老师们出手帮助,谢谢!

演示文稿1.rar (88.86 KB, 下载次数: 4)

TA的精华主题

TA的得分主题

 楼主| 发表于 2023-3-18 09:23 | 显示全部楼层
反复折腾就改了一个图形随机编号,这样能随机复制粘贴,但还是解决不了在当前放映的页面中粘贴,并显示带有名字的消息文本,让其停留2秒在自动删除刚复制的图片。
及时颁奖.rar (798.96 KB, 下载次数: 1)

TA的精华主题

TA的得分主题

 楼主| 发表于 2023-3-18 17:04 | 显示全部楼层
找了个获取播放页面页码代码加上,但还是不能达到效果。求帮助!
及时颁奖.rar (799.29 KB, 下载次数: 1)

TA的精华主题

TA的得分主题

 楼主| 发表于 2023-3-19 16:00 | 显示全部楼层
上次在Yalishanda30 的帮助做的发奖状课件,孩子们可高兴了一段时间,后来学生问我:“老师怎么只发奖状,难道没其它奖励吗?如我们生日时给发个蛋糕图片不行吗?”“于是就想着把各种奖品图片都放在最后一页,上课时点哪个名字,就在该页面随机粘贴最后页中的一张图片,并添加一个文本恭喜勤学善思的某某获得奖品一份,等待3秒,删除刚才粘贴过来的图片和文本,每次获得奖励的同学在倒数第二页表格记录下来,可是我是vba菜鸟,只实现了3楼效果,我就把Yalishanda30 的代码照搬中间改成我折腾的几句,点击没有任何反应,又只好来求助,请高手们出手帮助一下,先表示感谢!
及时颁奖.rar (1.83 MB, 下载次数: 4)

TA的精华主题

TA的得分主题

发表于 2023-3-20 10:10 | 显示全部楼层
yangqianming 发表于 2023-3-19 16:00
上次在Yalishanda30 的帮助做的发奖状课件,孩子们可高兴了一段时间,后来学生问我:“老师怎么只发奖状, ...

未经严格测试,仅供参考

求助.zip

1.89 MB, 下载次数: 8

评分

1

查看全部评分

TA的精华主题

TA的得分主题

 楼主| 发表于 2023-3-20 10:38 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
Yalishanda30 发表于 2023-3-20 10:10
未经严格测试,仅供参考

真正的大神,膜拜!

TA的精华主题

TA的得分主题

发表于 2023-3-20 10:51 | 显示全部楼层

TA的精华主题

TA的得分主题

 楼主| 发表于 2023-3-20 13:54 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
Yalishanda30 发表于 2023-3-20 10:51
额。。。离大神还远着呢

好像把图片换成动态gif图片,动图效果就没有了。能解决吗?
c6866463db7742a0b66b4856d4157dfb.gif
1ed31b8e48014d109ba7bfc9f92d77c8.gif 2bcfd83980ef4c8ebb5fd72efd68448f.gif 3b8e49c4abbb4165a0e7c9eb9bb30358.gif 4e1c02b2715f4fb6b6309f6ef83a3507.gif 6e52871727664dbcacdcf596cce2592f.gif 29d0df01cfa94eb58d014d06a01321e0.gif 32fee643e6d0449db4a32d429f8234ba.gif 766f17812d5e4a72bd1bd2326977d411.gif 0a5a1f377e22484996f3101148453f44.gif
d64693e0de8bba106218f39bc5b2dc8c.gif

TA的精华主题

TA的得分主题

发表于 2023-3-20 14:48 | 显示全部楼层
yangqianming 发表于 2023-3-20 13:54
好像把图片换成动态gif图片,动图效果就没有了。能解决吗?

图片控件不支持动图,需要用其他控件

求助.zip

1.93 MB, 下载次数: 11

评分

2

查看全部评分

TA的精华主题

TA的得分主题

发表于 2023-3-21 14:42 | 显示全部楼层
yangqianming 发表于 2023-3-20 13:54
好像把图片换成动态gif图片,动图效果就没有了。能解决吗?

更新,

动态图自动匹配浏览器大小

求助.zip

1.93 MB, 下载次数: 17

评分

1

查看全部评分

您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-11-18 07:25 , Processed in 0.040627 second(s), 11 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表