Font.Application, propriété (PowerPoint)

Article
04/07/2023

Renvoie un objet Application qui représente le créateur de l’objet spécifié.

Syntaxe

expression. Application

expression Variable qui représente un objet Font.

Valeur renvoyée

Application

Exemple

Dans cet exemple, un objet Presentation est passé à la procédure. Celle-ci ajoute une diapositive à la présentation et enregistre cette dernière dans le dossier où s’exécute Microsoft PowerPoint.

Sub AddAndSave(pptPres As Presentation)

    pptPres.Slides.Add 1, 1

    pptPres.SaveAs pptPres.Application.Path & "\Added Slide"

End Sub

Cet exemple affiche le nom de l’application qui a créé les objets OLE liés sur la diapositive 1 de la présentation active.

For Each shpOle In ActivePresentation.Slides(1).Shapes

    If shpOle.Type = msoLinkedOLEObject Then

        MsgBox shpOle.OLEFormat.Application.Name

    End If

Next

Voir aussi

Font, objet

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.

Partager via