PowerPoint VBA教程:PresetTexture属性

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

MsoPresetTexture 可以是下列 MsoPresetTexture 类型常数之一。
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

expression.PresetTexture

expression  必选。该表达式返回“应用于”列表中的对象之一。

使用PresetTextured方法为填充设置预设纹理。

VBA示例

本示例向myDocument 中添加矩形,并且设置该矩形的预设纹理以便和第二个形状的纹理相匹配。要使本示例执行,第二个形状必须使用预设纹理的填充。


Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes
    presetTexture2 = .Item(2).Fill.PresetTexture
    .AddShape(msoShapeRectangle, 100, 0, 40, 80).Fill _
        .PresetTextured presetTexture2
End With

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

PowerPoint VBA教程:PresetTexture属性

PowerPoint VBA教程:PresetThreeDFormat属性 PowerPoint VBA教程:PrintColorType属性
PowerPoint VBA教程:PrintComments属性 PowerPoint VBA教程:PrintFontsAsGraphics属性
PowerPoint VBA教程:PrintHiddenSlides属性 PowerPoint VBA教程:PrintInBackground属性
PowerPoint VBA教程:PrintOptions属性 PowerPoint VBA教程:PrintSteps属性
PowerPoint VBA教程:ProductCode属性 PowerPoint VBA教程:ProgID属性
PowerPoint VBA教程:Property属性 PowerPoint VBA教程:PropertyEffect属性
PowerPoint VBA教程:PublishObjects属性 PowerPoint VBA教程:RangeEnd属性
PowerPoint VBA教程:Ranges属性 PowerPoint VBA教程:RangeStart属性
PowerPoint VBA教程:RangeType属性 PowerPoint VBA教程:ReadOnly属性
PowerPoint VBA教程:Registered属性 PowerPoint VBA教程:Relative属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号