PPT播放时任意拖动页面中的足球

odyssey166 · 发表于 2025-2-15 22:14

各位老师：

现在希望用VBA实现用鼠标点击左键（不放）能任意拖动页面中的足球。

足球的应该是“图片１１”

先谢谢了

lss001 · 发表于 2025-2-16 20:28

本帖最后由 lss001 于 2025-2-17 13:26 编辑

请参考附件代码！

鼠标拖动图片.zip (131.75 KB, 下载次数: 9)

odyssey166 · 发表于 2025-2-16 21:56

lss001 发表于 2025-2-16 20:28
请参考附件附件代码！

好像没看到您给的附件

dongdonggege · 发表于 2025-2-20 20:28

lss001 发表于 2025-2-16 20:28
请参考附件代码！

拖动有残影

rgzyj@163.com · 发表于 2025-3-3 09:57

能不能增加：鼠标放到足球上后，改变鼠标的形状，按下鼠标准备拖动时鼠标又变成另一种形式。

rgzyj@163.com · 发表于 2025-3-3 09:59

lss001 发表于 2025-2-16 20:28
请参考附件代码！

能不能增加：鼠标放到足球上后，改变鼠标的形状，按下鼠标准备拖动时鼠标又变成另一种形式。

lss001 · 发表于 2025-3-3 11:38

rgzyj@163.com 发表于 2025-3-3 09:59
能不能增加：鼠标放到足球上后，改变鼠标的形状，按下鼠标准备拖动时鼠标又变成另一种形式。

需要什么形状自行添加
可以参考一下office帮助链接
https://learn.microsoft.com/zh-cn/office/vba/language/reference/user-interface-help/mousepointer-property

用户名		自动登录	找回密码
密码			免费注册

[求助] PPT播放时任意拖动页面中的足球