Freigeben über


BorderArtFormat.Set-Methode (Publisher)

Legt den Typ des Zierrahmens fest, der auf die angegebene Form angewendet wird.

Syntax

Ausdruck. Set (BorderArtName)

Ausdruck Eine Variable, die ein BorderArtFormat-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
BorderArtName Erforderlich Variant Der Name des Zierrahmentyps, der auf die angegebene Form angewendet wird.

HinwBemerkungeneise

Sie können auch den Typ von BorderArt festlegen, der auf eine Form angewendet wird, indem Sie die Name-Eigenschaft verwenden.

Beispiel

Das folgende Beispiel prüft das Vorhandensein von Zierrahmen für jede Form auf jeder Seite des aktiven Dokuments. Jeder gefundene Zierrahmen wird auf den gleichen Typ festgelegt.

Sub SetBorderArt() 
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 
 .Set(strBorderArtName) 
 End If 
 End With 
 Next anyShape 
 Next anyPage 
End Sub

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.