É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
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.