Freigeben über

TextRange.Application-Eigenschaft (Publisher)

  • Artikel

Bei Verwendung ohne Objektqualifizierer gibt diese Eigenschaft ein Application-Objekt zurück, das die aktuelle Instanz von Publisher darstellt.

Wenn ohne einen Objektbezeichner verwendet wird, gibt diese Eigenschaft ein Application -Objekt, das den Ersteller des angegebenen Objekts darstellt.

Wird sie mit einem OLE-Objekt verwendet, gibt sie die Anwendung des Objekts zurück.

Syntax

Ausdruck. Anwendung

Ausdruck Eine Variable, die ein TextRange-Objekt darstellt.

Beispiel

In dem folgenden Beispiel werden die Angaben zu Version und Build von Publisher angezeigt.

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

In dem foglenden Beispiel wird jeweils der Name der Anwendung angezeigt, in der die verknüpften OLE-Objekte auf der ersten Seite der Publikation erstellt wurden.

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

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.