Excel VBA教程:PresetTexture属性

返回指定填充的预设纹理。MsoPresetTexture 类型,只读。

MsoPresetTexture 可为以下 MsoPresetTexture 常量之一。
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   必需。该表达式返回“应用于”列表中的对象之一。

可用 PresetTextured方法设置填充格式的预置纹理。

示例

本示例以第一个图表中使用的填充格式对第二个图表的填充格式进行设置。


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

上页:Excel VBA教程:PresetTextEffect属性 下页:Excel VBA教程:PresetThreeDFormat属性

Excel VBA教程:PresetTexture属性

Excel VBA教程:PresetThreeDFormat属性 Excel VBA教程:Previous属性
Excel VBA教程:PreviousSelections属性 Excel VBA教程:PrintArea属性
Excel VBA教程:PrintComments属性 Excel VBA教程:PrintErrors属性
Excel VBA教程:PrintGridlines属性 Excel VBA教程:PrintHeadings属性
Excel VBA教程:PrintNotes属性 Excel VBA教程:PrintObject属性
Excel VBA教程:PrintQuality属性 Excel VBA教程:PrintSettings属性
Excel VBA教程:PrintTitleColumns属性 Excel VBA教程:PrintTitleRows属性
Excel VBA教程:PrintTitles属性 Excel VBA教程:ProductCode属性
Excel VBA教程:ProgId属性 Excel VBA教程:PromptForSummaryInfo属性
Excel VBA教程:PromptString属性 Excel VBA教程:Properties属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号