BorderArt-Objekt (Publisher)
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.
Hinweise
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.