通过

Application.PresentationSave 事件 (PowerPoint)

  • 项目

保存任意打开的演示文稿前发生此事件。

语法

expression。 PresentationSave( _Pres_ )

expression：表示“Application”对象的变量。

参数

名称 必需/可选 数据类型 说明
Pres 必需 Presentation 要保存的演示文稿。

备注

有关使用 Application 对象的事件的信息，请参阅操作方法：使用 Application 对象事件。

示例

本示例将当前演示文稿保存为 HTML 4.0 类型的文件，其文件名为“mallard.htm”。然后显示一条消息，表明当前文件名的演示文稿同时保存为 PowerPoint 和 HTML 两种格式。

Private Sub App_PresentationSave(ByVal Pres As Presentation)
    With Pres.PublishObjects(1)

        PresName = .SlideShowName
        .SourceType = ppPublishAll
        .FileName = "C:\HTMLPres\mallard.htm"
        .HTMLVersion = ppHTMLVersion4

        MsgBox ("Saving presentation " & "'" _
            & PresName & "'" & " in PowerPoint" _
            & Chr(10) & Chr(13) _
            & " format and HTML version 4.0 format")
			
        .Publish
    End With
End Sub

另请参阅

Application 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。