Word) (Document.Shapes 屬性
會傳回代表指定檔中所有 Shape 物件的Shapes集合。 唯讀。
語法
運算式。形狀
表達 代表 Document 物件的變數。
註解
這個集合可以包含繪圖、圖案、圖片、OLE 物件、ActiveX 控制項、文字物件及圖說文字。 如需傳回集合中單一成員的資訊,請參閱 從集合傳回物件。
Shapes 屬性套用至文件時傳回文件中,不包括結尾的頁首與頁尾的主要本文中所有 Shape 物件。
範例
這則範例會建立新的文件、加入一個 100 點寬且 50 點高的矩形,然後將此矩形的左上角設定為距離左邊緣 5 點而距離頁面左上角 25 點。
Set myDoc = Documents.Add
myDoc.Shapes.AddShape msoShapeRectangle, 5, 25, 100, 50
這則範例會為使用中文件的所有圖案設定填滿材質。
For Each s in ActiveDocument.Shapes
s.Fill.PresetTextured msoTextureOak
Next s
這則範例會將陰影加入至使用中文件的第一個圖案。
Set myShape = ActiveDocument.Shapes(1)
myShape.Shadow.Type = msoShadow6
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。
意見反應
https://aka.ms/ContentUserFeedback。
即將登場:在 2024 年,我們將逐步淘汰 GitHub 問題作為內容的意見反應機制,並將它取代為新的意見反應系統。 如需詳細資訊,請參閱:提交並檢視相關的意見反應