ColorSchemeChanged 事件

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

object 变量。该变量引用在类模块中以事件方式声明的 Application 类型的对象。

SldRange 受更改影响的幻灯片范围。

说明

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

若要访问 Application 事件，请在代码的通用声明部分中声明一个 Application 变量。然后将此变量设置为要访问其事件的 Application 对象。有关使用 Microsoft PowerPoint Application 对象事件的信息，请参阅使用 Application 对象的事件。

示例

本示例在选定的单个或多个幻灯片的配色方案更改后显示一个消息。本示例假定一个称为 PPTApp 的 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