ChartFillFormat.PresetTextured Method
Returns the preset texture for the specified fill. Read-only.
Namespace: Microsoft.Office.Interop.PowerPoint
Assembly: Microsoft.Office.Interop.PowerPoint (in Microsoft.Office.Interop.PowerPoint.dll)
Syntax
'Declaration
Sub PresetTextured ( _
PresetTexture As MsoPresetTexture _
)
'Usage
Dim instance As ChartFillFormat
Dim PresetTexture As MsoPresetTexture
instance.PresetTextured(PresetTexture)
void PresetTextured(
MsoPresetTexture PresetTexture
)
Parameters
- PresetTexture
Type: Microsoft.Office.Core.MsoPresetTexture
Remarks
The value of the PresetTexture property 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 |
Examples
This example adds a rectangle to the myDocument and sets its preset texture to match that of shape two. For the example to work, shape two must have a preset textured fill.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes
presetTexture2 = .Item(2).Fill.PresetTexture.AddShape(msoShapeRectangle, 100, 0, 40, 80).Fill _
.PresetTextured presetTexture2
End With