Question

全部显示

应用于CalloutFormat 对象的 Length 属性。

当指定标注的AutoLength 属性设为False 时，Length 属性返回标注线的第一段（添加到文本标注框中的部分）的长度（以磅为单位）。仅应用于标注线多于一段的标注（msoCalloutThree 和msoCalloutFour 类型）。只读。Float 类型。使用CustomLength 方法为CalloutFormat 对象设置该属性的值。

expression。Length

expression必选。该表达式返回上述对象之一。

应用于TextRange 对象的 Length 属性。

以字符方式返回指定文本范围的长度。只读。Long 类型。

expression。Length

expression必选。该表达式返回上述对象之一。

示例

应用于 CalloutFormat 对象。

如果标注“co1”的第一段有固定的长度，本示例将标注“co2”的第一段也指定为该固定长度。要执行该示例，两个标注都必须有多个段。

Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes
 With .Item("co1").Callout
 If Not .AutoLength Then len1 = .Length
 End With
 If len1 Then .Item("co2").Callout.CustomLength len1
End With

应用于 TextRange 对象。

如果第二张幻灯片的标题含有五个以上字符，本示例将标题的字体大小设为 48 磅，如果标题为五个或五个以下字符，则将字体大小设为 72 磅。

Set myDocument = ActivePresentation.Slides(2)
With myDocument.Shapes(1).TextFrame.TextRange
 If .Length > 5 Then
 .Font.Size = 48
 Else
 .Font.Size = 72
 End If
End With