FillFormat.TextureName 属性 (Publisher)
返回一个 字符串 ,表示指定填充的自定义纹理文件的名称。 此为只读属性。
语法
表达式。TextureName
表达 一个代表 FillFormat 对象的变量。
返回值
String
备注
使用 UserTextured 方法来设置填充的纹理文件。
示例
本示例将一个椭圆添加到当前出版物。 如果当前出版物上的第一个形状具有用户定义纹理的填充,新椭圆的填充将与第一个形状相同。 如果第一个形状的填充是任意其他类型,新椭圆将具有绿色大理石填充。
Dim ffNew As FillFormat
With ActiveDocument.Pages(1).Shapes
Set ffNew = .AddShape(Type:=msoShapeOval, _
Left:=0, Top:=0, Width:=200, Height:=90).Fill
With .Item(1).Fill
If .Type = msoFillTextured And _
.TextureType = msoTextureUserDefined Then
ffNew.UserTextured _
TextureFile:=.TextureName
Else
ffNew.PresetTextured _
PresetTexture:=msoTextureGreenMarble
End If
End With
End With
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。
反馈
https://aka.ms/ContentUserFeedback。
即将发布:在整个 2024 年,我们将逐步淘汰作为内容反馈机制的“GitHub 问题”,并将其取代为新的反馈系统。 有关详细信息,请参阅:提交和查看相关反馈