共用方式為


PowerPoint) (Shapes.AddShape 方法

建立快取圖案。 會傳回代表新快取圖案的 Shape 物件。

語法

expressionAddShape( _Type_, _Left_, _Top_, _Width_, _Height_ )

expression 代表 Shapes 物件的變數。

參數

名稱 必要/選用 資料類型 描述
Type 必要 MsoAutoShapeType 指定要建立的快取圖案的類型。
Left 必要 Single 相對於投影片左緣,以點為單位指定快取圖案左緣的位置。
Top 必要 Single 相對於投影片上緣,以點為單位指定快取圖案上緣的位置。
Width 必要 Single 以點為單位指定快取圖案的寬度。
Height 必要 Single 以點為單位指定快取圖案的高度。

傳回值

圖形

註解

若要變更已新增之快取圖案的類型,設定 AutoShapeType 屬性。

範例

本範例在 myDocument 中新增矩形。

Set myDocument = ActivePresentation.Slides(1) 
myDocument.Shapes.AddShape Type:=msoShapeRectangle, _ 
    Left:=50, Top:=50, Width:=100, Height:=200

另請參閱

Shapes 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應