Export (0) Print
Expand All

SetTextured Method

Office 2003

Fills the specified ChInterior object with an image or a preset texture.

expression.SetTextured(textureFile, TextureFormat, stackUnit, TexturePlacement)

expression    Required. An expression that returns a ChInterior object.

ChartPresetTextureEnum can be one of these ChartPresetTextureEnum constants.
chTextureBlueTissuePaper
chTextureBouquet
chTextureBrownMarble
chTextureCanvas
chTextureCork
chTextureDenim
chTextureFishFossil
chTextureGranite
chTextureGreenMarble
chTextureMediumWood
chTextureNewsprint
chTextureOak
chTexturePaperBag
chTexturePapyrus
chTextureParchment
chTexturePinkTissuePaper
chTexturePurpleMesh
chTextureRecycledPaper
chTextureSand
chTextureStationery
chTextureWalnut
chTextureWaterDroplets
chTextureWhiteMarble
chTextureWovenMat

ChartTextureFormatEnum can be one of these ChartTextureFormatEnum constants.
chStack
chStackScale
chStretch
chStretchPlot
chTile default

stackUnit   Optional Double. Specifies how the picture is stacked and scaled when the TextureFormat argument is set to chStackScale.

ChartTexturePlacementEnum can be one of these ChartTexturePlacementEnum constants.
chAllFaces default
chEnd
chEndSides
chFront
chFrontEnd
chFrontSides
chProjectFront
chSides

Example

This example sets the interior fill of the first two series and the plot area of the first chart in ChartSpace1.

Sub Format_Interior_Fills()

    Dim chConstants
    Dim serSeries1
    Dim serSeries2

    Set chConstants = ChartSpace1.Constants

    Set serSeries1 = ChartSpace1.Charts(0).SeriesCollection(0)
    Set serSeries2 = ChartSpace1.Charts(0).SeriesCollection(1)

    ' Set the interior fill of the first series to a two-color gradient.
    serSeries1.Interior.SetTwoColorGradient chConstants.chGradientDiagonalDown, _
               chConstants.chGradientVariantCenter, "Blue", "Silver"

    ' Set the interior fill of the second series to a solid color.
    serSeries2.Interior.SetSolid "Purple"

    ' Set the interior fill of the plot area to a preset texture.
    ChartSpace1.Charts(0).PlotArea.Interior.SetTextured _
              chConstants.chTextureParchment, chConstants.chTile

End Sub
		


Applies to | ChInterior Object



Show:
© 2015 Microsoft