PowerPoint) (Presentation.DefaultShape 屬性

會傳回 Shape 物件，表示簡報的預設圖案。 唯讀。

語法

expression。 DefaultShape

表達 代表 Presentation 物件的變數。

傳回值

圖形

範例

這則範例會將一個圖案加入至使用中簡報的第一張投影片、將簡報中圖案的預設填滿色彩設定為紅色，然後加入另一個圖案。 第二個圖案將會自動套用新的預設填滿色彩。

With Application.ActivePresentation

    Set sld1Shapes = .Slides(1).Shapes

    sld1Shapes.AddShape msoShape16pointStar, 20, 20, 100, 100

    .DefaultShape.Fill.ForeColor.RGB = RGB(255, 0, 0)

    sld1Shapes.AddShape msoShape16pointStar, 150, 20, 100, 100

End With

另請參閱

Presentation 物件

支援和意見反應

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