Свойство FillFormat.Pattern (Word)

Возвращает или задает констанду MsoPatternType , представляющую шаблон, применяемый к указанной заливке или строке. Только для чтения.

Синтаксис

expression. Узор

Выражение Выражение, возвращающее объект FillFormat .

Пример

В этом примере в myDocument добавляется прямоугольник и устанавливается его шаблон заливки в соответствии с шаблоном фигуры с именем rect1. Новый прямоугольник имеет тот же узор, что и "rect1", но не обязательно те же цвета. Цвета, используемые в шаблоне, задаются с помощью свойств BackColor и 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

См. также

Объект FillFormat

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.