PresetTextured 方法

       

将指定填充设置为预设的纹理。

expression.PresetTextured(PresetTexture)

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

PresetTexture  MsoPresetTexture 类型,必需。指定填充的预设纹理。

示例

本示例将图表的纹理填充格式由“栎木”改为“胡桃”。

With myChart.ChartArea.Fill
    If .Type = msoFillTextured Then
        If .TextureType = msoTexturePreset Then
            If .PresetTexture = msoTextureOak Then
                .PresetTextured msoTextureWalnut
            End If
        End If
    End If
End With