共用方式為


PowerPoint) (ShapeRange.PickUp 方法

複製指定之圖案的格式設定。 使用 Apply 方法套用到另一個圖案複製的格式。

語法

運算式皮卡

表達 代表 ShapeRange 物件的 變數。

範例

這個範例會複製 myDocument 上第一個圖案的格式,然後將所複製的格式套用至第二個圖案。

Set myDocument = ActivePresentation.Slides(1)

With myDocument

    .Shapes(1).PickUp

    .Shapes(2).Apply

End With

另請參閱

ShapeRange 物件

支援和意見反應

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