BorderArt-Objekt (Publisher)

  • Artikel

Stellt einen verfügbaren Typ des Zierrahmens dar. Bei Zierrahmen handelt es sich um Bildränder, die auf Textfelder, Grafikrahmen oder Rechtecke angewendet werden können. BorderArt -Objekt ist ein Mitglied der BorderArts -Auflistung. Die BorderArts -Auflistung enthält alle Zierrahmen für die Verwendung in der angegebenen Publikation verfügbar sind.

HinwBemerkungeneise

Die BorderArts -Auflistung enthält alle benutzerdefinierten Zierrahmentypen, die vom Benutzer für die angegebene Publikation erstellt.

Verwenden Sie die Item-Eigenschaft der BorderArts-Auflistung , um ein bestimmtes BorderArt-Objekt zurückzugeben. Das Index-Argument der Item-Eigenschaft kann die Nummer oder der Name des BorderArt-Objekts sein.

Verwenden Sie die Name -Eigenschaft, um anzugeben, welcher Typ von soll Zierrahmen auf eine Grafik angewendet.

Hinweis

Da Name die Standardeigenschaft des BorderArt-Objekts und des BorderArtFormat-Objekts ist, müssen Sie sie beim Festlegen des BorderArt-Typs nicht explizit angeben. Die -Anweisung Shape.BorderArtFormat = Document.BorderArts(1) entspricht Shape.BorderArtFormat.Name = Document.BorderArts(1).Name.

Beispiel

In diesem Beispiel wird die BorderArt mit dem Namen Apples aus der aktiven Publikation zurückgegeben.

Dim bdaTemp As BorderArt 
 
Set bdaTemp = ActiveDocument.BorderArts.Item (Index:="Apples")

Im folgenden Beispiel werden alle BorderArt-Objekte in einem Dokument mithilfe der Name-Eigenschaft auf denselben Typ festgelegt.

Sub SetBorderArtByName() 
 
Dim anyPage As Page 
Dim anyShape As Shape 
Dim strBorderArtName As String 
 
strBorderArtName = Document.BorderArts(1).Name 
 
For Each anyPage in ActiveDocument.Pages 
For Each anyShape in anyPage.Shapes 
With anyShape.BorderArt 
If .Exists = True Then 
.Name = strBorderArtName 
End If 
End With 
Next anyShape 
Next anyPage 
End Sub

Eigenschaften

Siehe auch

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.