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

Valeur renvoyée

Objet

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

Shape, 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