Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Devuelve o establece una constante MsoPatternType que representa la trama aplicada al relleno especificado o línea. Solo lectura.
Sintaxis
expresión. Patrón
expresión Expresión que devuelve un objeto FillFormat .
Ejemplo
En este ejemplo se agrega un rectángulo a myDocument y se establece su patrón de relleno para que coincida con el de la forma denominada "rect1". El nuevo rectángulo tiene el mismo patrón que "rect1", pero no necesariamente los mismos colores. Los colores utilizados en la trama se establecen con las propiedades BackColor y ForeColor.
Set myDocument = ActiveDocument
With myDocument.Shapes
pattern1 = .Item("rect1").Fill.Pattern
With .AddShape(msoShapeRectangle, 100, 100, 120, 80).Fill
.ForeColor.RGB = RGB(128, 0, 0)
.BackColor.RGB = RGB(0, 0, 255)
.Patterned pattern1
End With
End With
Vea también
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.