通过

Application.ColorSchemeChanged 事件 (PowerPoint)

  • 项目

配色方案更改后发生此事件。

语法

expression。 ColorSchemeChanged( _SldRange_ )

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

参数

名称 必需/可选 数据类型 说明
SldRange 必需 SlideRange 受更改影响的幻灯片范围。

备注

触发此事件的操作包括诸如修改幻灯片或幻灯片母版的配色方案或应用模板之类的操作。

若要访问 应用程序 事件， 应用程序 中声明变量代码的通用声明部分。 您要访问的事件的 应用程序 对象，然后设置变量等。 有关使用 Microsoft PowerPoint Application 对象的事件的信息，请参阅操作方法：使用 Application 对象事件。

示例

更改选定的幻灯片或幻灯片的配色方案时，本示例将显示一条消息。 此示例假定已经使用 WithEvents 关键字声明保存 应用程序 对象。

Private Sub PPTApp_ColorSchemeChanged(ByVal SldRange As SlideRange)



    If SldRange.Count = 1 Then

        MsgBox "You've changed the color scheme for " _
            & SldRange.Name & "."

    Else

        MsgBox "You've changed the color scheme for " _
            & SldRange.Count & " slides."

    End If

End Sub

另请参阅

Application 对象

支持和反馈

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