共用方式為


Publisher) (FillFormat.PresetTexture 屬性

會傳回代表指定填滿之預設材質的 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 支援與意見反應