Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Задает для указанной заливки шаблон.
Синтаксис
expression. Шаблон (шаблон)
выражение Переменная, представляющая объект FillFormat .
Параметры
| Имя | Обязательный или необязательный | Тип данных | Описание |
|---|---|---|---|
| Pattern | Обязательный | MsoPatternType | Шаблон, используемый для указанной заливки. Возможные значения см. в разделе Примечания. |
Замечания
Используйте свойства BackColorи ForeColor , чтобы задать цвета, используемые в шаблоне.
Значение параметра Pattern может быть одной из этих констант MsoPatternType .
| msoPattern10Percent |
| msoPattern20Percent |
| msoPattern25Percent |
| msoPattern30Percent |
| msoPattern40Percent |
| msoPattern50Percent |
| msoPattern5Percent |
| msoPattern60Percent |
| msoPattern70Percent |
| msoPattern75Percent |
| msoPattern80Percent |
| msoPattern90Percent |
| msoPatternDarkDownwardDiagonal |
| msoPatternDarkHorizontal |
| msoPatternDarkUpwardDiagonal |
| msoPatternDashedDownwardDiagonal |
| msoPatternDashedHorizontal |
| msoPatternDashedUpwardDiagonal |
| msoPatternDashedVertical |
| msoPatternDiagonalBrick |
| msoPatternDivot |
| msoPatternDottedDiamond |
| msoPatternDottedGrid |
| msoPatternHorizontalBrick |
| msoPatternLargeCheckerBoard |
| msoPatternLargeConfetti |
| msoPatternLargeGrid |
| msoPatternLightDownwardDiagonal |
| msoPatternLightHorizontal |
| msoPatternLightUpwardDiagonal |
| msoPatternLightVertical |
| msoPatternMixed |
| msoPatternNarrowHorizontal |
| msoPatternNarrowVertical |
| msoPatternOutlinedDiamond |
| msoPatternPlaid |
| msoPatternShingle |
| msoPatternSmallCheckerBoard |
| msoPatternSmallConfetti |
| msoPatternSmallGrid |
| msoPatternSolidDiamond |
| msoPatternSphere |
| msoPatternTrellis |
| msoPatternWave |
| msoPatternWeave |
| msoPatternWideDownwardDiagonal |
| msoPatternWideUpwardDiagonal |
| msoPatternZigZag |
| msoPatternDarkVertical |
Пример
В этом примере в myDocument добавляется овал с шаблонной заливкой.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes.AddShape(msoShapeOval, 60, 60, 80, 40).Fill
.ForeColor.RGB = RGB(128, 0, 0)
.BackColor.RGB = RGB(0, 0, 255)
.Patterned msoPatternDarkVertical
End With
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.