设置或返回某值,该值代表应用于指定行的图案。可读写。MsoPatternType 类型。
MsoPatternType 可以是下列 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 |
expression.Pattern
expression 必选。该表达式返回上述对象之一。
应用于 FillFormat 对象的 Pattern 属性。
设置或返回某值,该值代表应用于指定填充的图案。使用 BackColor 和 ForeColor 属性设置在图案中使用的颜色。只读。MsoPatternType 类型。
MsoPatternType 可以是下列 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 |
expression.Pattern
expression 必选。该表达式返回上述对象之一。
本示例在 myDocument
中添加具有图案的行。
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes.AddLine(10, 100, 250, 0).Line
.Weight = 6
.ForeColor.RGB = RGB(0, 0, 255)
.BackColor.RGB = RGB(128, 0, 0)
.Pattern = msoPatternDarkDownwardDiagonal
End With
本示例向 myDocument
中添加矩形,并且设置矩形的填充图案以适应名为“rect1”的形状中的填充图案。新矩形使用和 rect1 相同的图案,但是颜色没有必要相同。通过 BackColor 和 ForeColor 属性设置在该图案中使用的颜色。
Set myDocument = ActivePresentation.Slides(1)
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