[求助]如何做: ppt中鼠标划过某文本框时显示其他文本框

blackfans

QUOTE:
<div class="msgborder">以下是引用tomlitomli在2008-1-15 12:59:56的发言：
这个应该符合你的要求
WmUCGJTk.rar (5.86 KB, 下载次数: 220)

2016-4-7 18:39 上传

点击文件名下载附件

user_jenws

没有做不到的，只有想不到的

user_ifjkc

用文字超链接做的。最坏就是不能用图片，只能是文字

user_cfuue

呵呵，挺有意思，俺研究一下，上面那个有图的是用的动作设置里面的宏啊，不过还不太懂呢

user_gnhkp

咋没个 答案呢

user_eatct

我也很想知道答案

carrick

为什么不能写回复呢？

roach_work

Sub 出现()
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(3)
    .Visible = msoTrue
End With
End Sub
Sub 消失()
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(3)
    .Visible = msoFalse
End With
End Sub