PowerPoint VBA教程:CustomLength方法

指定标注线的第一段(附加到文本标注框的段)在标注被移动时保持固定长度。使用AutomaticLength方法指定第一段在标注被移动时自动缩放。仅应用于标注线多于一段的标注(msoCalloutThree 和 msoCalloutFour 类型)。

expression.CustomLength(Length)

expression  必选。该表达式返回一个 CalloutFormat对象。

Length  必选。Single 类型。标注的第一段的长度,以磅为单位。

说明

应用该方法会将AutoLength属性设为 False,并将Length属性设为 Length参数指定的值。

VBA示例

本示例在自动调整比例的第一段和具有固定长度的另一段之间切换myDocument 的第一个形状的标注线。


Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(1).Callout
    If .AutoLength Then
        .CustomLength 50
    Else
        .AutomaticLength
    End If
End With

上页:PowerPoint VBA教程:CustomDrop方法 下页:PowerPoint VBA教程:Cut方法

PowerPoint VBA教程:CustomLength方法

PowerPoint VBA教程:Cut方法 PowerPoint VBA教程:Delete方法
PowerPoint VBA教程:DeleteText方法 PowerPoint VBA教程:DiscardConflict Method
PowerPoint VBA教程:Distribute方法 PowerPoint VBA教程:DoVerb方法
PowerPoint VBA教程:DrawLine方法 PowerPoint VBA教程:Duplicate方法
PowerPoint VBA教程:EndConnect方法 PowerPoint VBA教程:EndDisconnect方法
PowerPoint VBA教程:EndNamedShow方法 PowerPoint VBA教程:EndReview方法
PowerPoint VBA教程:EraseDrawing方法 PowerPoint VBA教程:Exit方法
PowerPoint VBA教程:Export方法 PowerPoint VBA教程:Find方法
PowerPoint VBA教程:FindBySlideID方法 PowerPoint VBA教程:FindFirstAnimationFor方法
PowerPoint VBA教程:FindFirstAnimationForClick方法 PowerPoint VBA教程:First方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号