Application.PresentationSave 事件

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

语法

表达式.PresentationSave(Pres)

表达式 一个代表 Application 对象的变量。

参数

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

说明

有关使用 Application 对象的事件的详细信息，请参阅使用 Application 对象的事件。

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

示例代码

示例代码
`function Application_PresentationSave(Pres) { let Pub = Pres.PublishObjects.Item(1) PresName = Pub.SlideShowName Pub.SourceType = ppPublishAll Pub.FileName = "C:\\HTMLPres\\mallard.htm" Pub.HTMLVersion = ppHTMLv4 MsgBox("Saving presentation " + "'" + PresName + "'" + " inWPP" + "\n" + "\r" + " format and HTML version 4.0 format") Pub.Publish }`

function Application_PresentationSave(Pres) {
    let Pub = Pres.PublishObjects.Item(1)
    PresName = Pub.SlideShowName
    Pub.SourceType = ppPublishAll
    Pub.FileName = "C:\\HTMLPres\\mallard.htm"
    Pub.HTMLVersion = ppHTMLv4
    MsgBox("Saving presentation " + "'" + PresName + "'" + " inWPP" + "\n" + "\r" + " format and HTML version 4.0 format")
    Pub.Publish
}

请参阅

Application 对象
Application 对象成员