PowerPoint VBA教程:PickUp方法

复制指定形状的格式。使用Apply方法将复制的格式应用于其他形状。

expression.PickUp

expression  必选。该表达式返回一个 Shape 或 ShapeRange对象。

VBA示例

本示例在myDocument 上复制第一个形状的格式,然后将该格式应用于第二个形状。


Set myDocument = ActivePresentation.Slides(1)
With myDocument
    .Shapes(1).PickUp
    .Shapes(2).Apply
End With

上页:PowerPoint VBA教程:Patterned方法 下页:PowerPoint VBA教程:Picture方法

PowerPoint VBA教程:PickUp方法

PowerPoint VBA教程:Picture方法 PowerPoint VBA教程:Play方法
PowerPoint VBA教程:PointsToScreenPixelsX方法 PowerPoint VBA教程:PointsToScreenPixelsY方法
PowerPoint VBA教程:PresetDrop方法 PowerPoint VBA教程:PresetGradient方法
PowerPoint VBA教程:PresetTextured方法 PowerPoint VBA教程:Previous方法
PowerPoint VBA教程:PrevNode方法 PowerPoint VBA教程:PrintOut方法
PowerPoint VBA教程:Publish方法 PowerPoint VBA教程:Quit方法
PowerPoint VBA教程:Range方法 PowerPoint VBA教程:RangeFromPoint方法
PowerPoint VBA教程:Regroup方法 PowerPoint VBA教程:ReloadAs方法
PowerPoint VBA教程:Remove方法 PowerPoint VBA教程:RemoveBaseline方法
PowerPoint VBA教程:RemovePeriods方法 PowerPoint VBA教程:Replace方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号