Propiedad BorderArtFormat.StretchPictures (Publisher)

True para expandir la imagen que componen el borde decorativo especificado para ajustarse a la forma a la que se aplica. Boolean de lectura y escritura.

Sintaxis

expresión. StretchPictures

expresión Variable que representa un objeto BorderArtFormat .

Valor devuelto

Booleano

Comentarios

Devuelve el error "Permiso denegado" si no se ha aplicado ningún borde decorativo al objeto especificado.

Corresponde a las imágenes No estirar y Ajustar imágenes para ajustarlas a los controles del cuadro de diálogo BorderArt .

Ejemplo

En el ejemplo siguiente se comprueba si las formas incluidas en las páginas del documento activo tienen bordes decorativos. En caso afirmativo, se establecen los bordes decorativos para que se puedan ajustar.

Sub StretchBorderArt() 
 Dim anyPage As Page 
 Dim anyShape As Shape 
 
 For Each anyPage in ActiveDocument.Pages 
 For Each anyShape in anyPage.Shapes 
 With anyShape.BorderArt 
 If .Exists = True Then 
 .StretchPictures = True 
 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.