Partager via


Événement Application.WindowDeactivate (PowerPoint)

Cet événement se produit lorsque la fenêtre d’application, ou n’importe quelle fenêtre de document, est désactivée.

Syntaxe

expression. WindowDeactivate (Pres, Wn)

expressionUne variable qui représente un objetApplication.

Paramètres

Nom Requis/Facultatif Type de données Description
Prés Requis Presentation Présentation affichée dans la fenêtre désactivée.
Wn Requis DocumentWindow Fenêtre de document désactivée.

Exemple

Cet exemple trouve le nom de fichier (sans son extension) pour la présentation dans la fenêtre qui est désactivée. Il ajoute ensuite l’extension .htm au nom de fichier et l’enregistre en tant que page web dans le même dossier que la présentation.

Private Sub App_WindowDeactivate (ByVal Pres As Presentation, ByVal Wn As DocumentWindow)

    FindNum = InStr(1, Wn.Presentation.FullName, ".")

    If FindNum = 0 Then

        HTMLName = Wn.Presentation.FullName & ".htm"

    Else

        HTMLName = Mid(Wn.Presentation.FullName, 1, FindNum - 1) _
            & ".htm"

    End If

    Wn.Presentation.SaveCopyAs HTMLName, ppSaveAsHTML

    MsgBox "Presentation being saved in HTML format as " _
        & HTMLName & " ."

End Sub

Voir aussi

Objet Application

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.