TextureType 属性

返回指定填充的纹理类型。只读。MsoTextureType 类型。使用 PresetTextured 或 UserTextured 方法设置填充的纹理类型。

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

示例

本例将 myDocument 中所有形状的填充更改为画布，这些形状全部使用自定义的纹理填充。

Set myDocument = ActivePresentation.Slides(1)
For Each s In myDocument.Shapes
    With s.Fill
        If .TextureType = msoTextureUserDefined Then
            .PresetTextured msoTextureCanvas
        End If
    End With
Next