PowerPoint) (Application.ColorSchemeChanged 事件

發生在色彩配置變更之後。

語法

expression。 ColorSchemeChanged( _SldRange_ )

expression 代表 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

另請參閱

Application 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。