读书人

VBScript操作powerpoint的有关问题

发布时间: 2013-09-07 14:12:45 作者: rapoo

VBScript操作powerpoint的问题
大家好。在下是VB菜包。
现在想用VBScript获取ppt文档的页眉。
其实说白了,就是想获取如下这个东西。
ActivePresentation.Slide(1).HeadersFooters.Footer.Text
如果ppt里面确实有这个东东,在下是可以获取成功的。

问题是,如果一个ppt里面没有这东东,系统就会弹出错误提示。
我的目标是,如果ppt里面没有这东东,我直接退出就行了,不要让系统弹出这种错误提示。

请大家帮忙指导。谢谢!


[解决办法]


If ActivePresentation.Slides(1).HeadersFooters.Footer.Visible = -1 Then
MsgBox ActivePresentation.Slides(1).HeadersFooters.Footer.Text
Else
'没有设置页脚
End If

读书人网 >VB

热点推荐