PresetTexture Property

Applies To

FillFormat object.

Description

Returns the preset texture for the specified fill. Read-only Long.

Can be one of the following 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

This property is read-only. Use the PresetTextured method to set the preset texture for the fill.

Example

This example adds a rectangle to 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 = ActiveDocument
With myDocument.Shapes
    presetTexture2 = .Item(2).Fill.PresetTexture
    .AddShape(msoShapeRectangle, 100, 0, 40, 80).Fill _
        .PresetTextured presetTexture2
End With