指定した塗りつぶしのパターンを設定します。
構文
式。パターン化 (パターン)
表現FillFormat オブジェクトを表す変数。
パラメーター
| 名前 | 必須 / オプション | データ型 | 説明 |
|---|---|---|---|
| Pattern | 必須 | MsoPatternType | 指定した塗りつぶしに使用するパターンを指定します。 指定可能な値については、「備考」を参照してください。 |
解説
パターンで使用する色を設定するのには、 BackColorおよび ForeColor プロパティを使用します。
Pattern パラメーターの値には、これら が可能 定数のいずれかを指定できます。
| 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 のサポートおよびフィードバックを参照してください。