Propriété TextRange2.Application (Office)

  • Article

Lorsqu’elle est utilisée sans qualificateur d’objet, cette propriété renvoie un objet Application qui représente l’instance actuelle de l’application Microsoft Office. Lorsqu’elle est utilisée avec un qualificateur d’objet, cette propriété renvoie un objet Application qui représente le créateur de l’objet TextRange2 . Lorsqu’il est utilisé avec un objet OLE Automation , il retourne l’application de l’objet. En lecture seule.

Syntaxe

expression. Application

Expression Expression qui renvoie un objet TextRange2 .

Valeur renvoyée

Objet

Exemple

Cet exemple permet d'afficher le nom de l'application qui a créé l'objet OLE lié dans la page 1 de la composition Publisher active.

Dim shpOle As Shape 
 
For Each shpOle In ActiveDocument.Pages(1).Shapes 
 If shpOle.Type = pbLinkedOLEObject Then 
 MsgBox shpOle.OLEFormat.Application.Name 
 End If 
Next

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.