HeaderFooter.Application, propriété (Publisher)HeaderFooter.Application Property (Publisher)

Utilisée sans qualificateur d’objet, cette propriété renvoie un objet Application qui représente l’instance actuelle de Publisher.Used without an object qualifier, this property returns an Application object that represents the current instance of Publisher. Utilisée avec un qualificateur d’objet, cette propriété renvoie un objet Application qui représente le créateur de l’objet spécifié.Used with an object qualifier, this property returns an Application object that represents the creator of the specified object. Lorsqu'elle est utilisée avec un objet OLE Automation, elle renvoie les applications de l'objet.When used with an OLE Automation object, it returns the object's application.

SyntaxeSyntax

expression.expression. ApplicationApplication

expression Variable qui représente un objet HeaderFooter .expression A variable that represents a HeaderFooter object.

ExempleExample

Cet exemple affiche les informations de version et de build pour Publisher.This example displays the version and build information for Publisher.

With Application 
 MsgBox "Current Publisher: version " _ 
 & .Version & " build " & .Build 
End With

Cet exemple affiche le nom de l'application qui a créé chaque objet OLE lié sur la page un de la composition active.This example displays the name of the application that created each linked OLE object on page one of the active publication.

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