Propriedade FillFormat.Pattern (Word)
Retorna ou define uma constante MsoPatternType que representa o padrão aplicado ao preenchimento especificado ou linha. Somente leitura.
Sintaxe
expressão. Padrão
Expressão Uma expressão que retorna um objeto FillFormat .
Exemplo
Este exemplo adiciona um retângulo ao myDocument e define seu padrão de preenchimento para corresponder ao da forma chamada "rect1". O novo retângulo tem o mesmo padrão que "rect1", mas não necessariamente as mesmas cores. As cores usadas no padrão são definidas com as propriedades BackColor e 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
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.