expression.PresetTextured(PresetTexture)
expression Required. An expression that returns one of the objects in the Applies To list.
PresetTexture Required MsoPresetTexture. The preset texture.
MsoPresetTexture can be one of these MsoPresetTexture constants. |
msoPresetTextureMixed Not used with this method. |
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 the active publication.
ActiveDocument.Pages(1).Shapes _
.AddShape(Type:=msoShapeCan, _
Left:=90, Top:=90, Width:=40, Height:=80) _
.Fill.PresetTextured _
PresetTexture:=msoTextureGreenMarble