适用于已使用 PickUp 方法复制指定的图形格式。
语法
表达式。应用
表达 一个代表 Shape 对象的变量。
示例
本示例复制 myDocument 上第一个形状的格式,然后将复制的格式应用于第二个形状。
Set myDocument = ActivePresentation.Slides(1)
With myDocument
.Shapes(1).PickUp
.Shapes(2).Apply
End With
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。