Sets the specified fill to a preset texture.
expression.PresetTextured(PresetTexture)
expression Required. An expression that returns a FillFormat object.
PresetTexture Required MsoPresetTexture. The preset texture.
MsoPresetTexture can be one of these MsoPresetTexture constants. |
msoPresetTextureMixed |
msoTextureBlueTissuePaper |
msoTextureBouquet |
msoTextureBrownMarble |
msoTextureCanvas |
msoTextureCork |
msoTextureDenim |
msoTextureFishFossil |
msoTextureGranite |
msoTextureGreenMarble |
msoTextureMediumWood |
msoTextureNewsprint |
msoTextureOak |
msoTexturePaperBag |
msoTexturePapyrus |
msoTextureParchment |
msoTexturePinkTissuePaper |
msoTexturePurpleMesh |
msoTextureRecycledPaper |
msoTextureSand |
msoTextureStationery |
msoTextureWalnut |
msoTextureWaterDroplets |
msoTextureWhiteMarble |
msoTextureWovenMat |
Example
This example adds a rectangle with a green-marble textured fill to myDocument
.
Set myDocument = ActivePresentation.Slides(1)
myDocument.Shapes.AddShape(msoShapeCan, 90, 90, 40, 80) _
.Fill.PresetTextured msoTextureGreenMarble