PresetTexture Property
Returns the preset texture for the specified fill. Read-only MsoPresetTexture.
| MsoPresetTexture can be one of these MsoPresetTexture constants. |
| msoPresetTextureMixed |
| msoTextureBouquet |
| msoTextureCanvas |
| msoTextureDenim |
| msoTextureGranite |
| msoTextureMediumWood |
| msoTextureOak |
| msoTexturePapyrus |
| msoTexturePinkTissuePaper |
| msoTextureRecycledPaper |
| msoTextureStationery |
| msoTextureWaterDroplets |
| msoTextureWovenMat |
| msoTextureBlueTissuePaper |
| msoTextureBrownMarble |
| msoTextureCork |
| msoTextureFishFossil |
| msoTextureGreenMarble |
| msoTextureNewsprint |
| msoTexturePaperBag |
| msoTextureParchment |
| msoTexturePurpleMesh |
| msoTextureSand |
| msoTextureWalnut |
| msoTextureWhiteMarble |
expression.PresetTexture
expression Required. An expression that returns one of the objects in the Applies To list.
Use the PresetTextured method to set the preset texture for the fill.
Example
This example sets the fill format for chart two to the same style used for chart one.
Set c1f = Charts(1).ChartArea.Fill
If c1f.Type = msoFillTextured Then
With Charts(2).ChartArea.Fill
.Visible = True
If c1f.TextureType = msoTexturePreset Then
.PresetTextured c1f.PresetTexture
Else
.UserTextured c1f.TextureName
End If
End With
End If