Método BorderArtFormat.Set (Publisher)

Establece el tipo de borde decorativo que se aplica a la forma especificada.

Sintaxis

expresión. Set (BorderArtName)

expresión Variable que representa un objeto BorderArtFormat .

Parameters

Observaciones

También puede establecer el tipo de BorderArt aplicado a una forma mediante la propiedad Name .

Ejemplo

En el siguiente ejemplo se comprueba si las formas incluidas en las páginas del documento activo tienen bordes decorativos. A continuación, los bordes decorativos que se encuentren se establecen en el mismo tipo.

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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.