<div class="msgborder">以下是引用tomlitomli在2008-1-15 12:59:56的发言:
这个应该符合你的要求
没有做不到的,只有想不到的 用文字超链接做的。最坏就是不能用图片,只能是文字 呵呵,挺有意思,俺研究一下,上面那个有图的是用的动作设置里面的宏啊,不过还不太懂呢 咋没个 答案呢 我也很想知道答案 为什么不能写回复呢? 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
页:
1
[2]