FillFormat.PresetTexture 属性 (Publisher)

返回一个 MsoPresetTexture 常量，该常量代表指定填充的预设纹理。 此为只读属性。

语法

表达式。PresetTexture

表达 一个代表 FillFormat 对象的变量。

返回值

MsoPresetTexture

备注

PresetTexture 属性值可以是在 Microsoft Office 类型库声明的 MsoPresetTexture 常量之一。

使用 PresetTextured 方法指定的填充格式的预置的纹理。

示例

本示例将一个矩形添加到当前出版物的第一页，并将其预设纹理设置为匹配该页上的第一个形状。 为了使本示例生效，第一个形状必须具有预设纹理填充。

Sub SetTexture() 
 Dim texture As MsoPresetTexture 
 With ActiveDocument.Pages(1).Shapes 
 texture = .Item(1).Fill.PresetTexture 
 With .AddShape(Type:=msoShapeRectangle, Left:=250, Top:=72, _ 
 Width:=40, Height:=80) 
 .Fill.PresetTextured PresetTexture:=texture 
 End With 
 End With 
End Sub

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。