Excel VBA教程:Length属性

应用于 CalloutFormat对象的 Length属性。

对于CalloutFormat对象,当指定标注的AutoLength属性为 False时,Length属性将以磅为单位返回标注线的第一条线段(即与标注文本框相连的线段)的长度。仅适用于标注线由若干线段组成的标注(msoCalloutThree 类型和 msoCalloutFour 类型)。Single 类型,只读。

expression.Length

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

 

应用于 Phonetics对象的 Length属性。

对于Phonetic对象,Length属性返回拼音文本中从指定位置开始的字符个数(该位置是用Start属性指定的)。Long 类型,只读。

expression.Length

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

 

说明

本属性为只读属性。可用CustomLength方法为 CalloutFormat对象设置本属性的值。

示例

如果标注“callout1”的第一条线段的长度固定为某一值,那么本示例将使第一张工作表上标注“callout2”的第一条线段的长度也固定为该值。为使本示例正常运行,两个标注必须都是由若干线段组成的。


Set myDocument = Worksheets(1)
With myDocument.Shapes
    With .Item("callout1").Callout
        If Not .AutoLength Then len1 = .Length
    End With
    If len1 Then .Item("callout2").Callout.CustomLength len1
End With

本示例返回活动单元格中第二个拼音文本串的长度。


ActiveCell.FormulaR1C1 = "toukyoutotoukyoutotoukyoutoshibuyakushibuyakushibuyakuyoyogiyoyogiyoyogi"
ActiveCell.Phonetics.Add Start:=1, Length:=3, Text:="toukyouto toukyoutotoukyouto toukyoutotoukyoutotoukyouto"
ActiveCell.Phonetics.Add Start:=4, Length:=3, Text:="shibuyaku shibuyakushibuyaku"
MsgBox ActiveCell.Phonetics(2).Length

上页:Excel VBA教程:LegendKey属性 下页:Excel VBA教程:LibraryPath属性

Excel VBA教程:Length属性

Excel VBA教程:LibraryPath属性 Excel VBA教程:Line属性
Excel VBA教程:Line3DGroup属性 Excel VBA教程:LineStyle属性
Excel VBA教程:LinkedCell属性 Excel VBA教程:LinkFormat属性
Excel VBA教程:ListChangesOnNewSheet属性 Excel VBA教程:ListCount属性
Excel VBA教程:ListFillRange属性 Excel VBA教程:ListHeaderRows属性
Excel VBA教程:ListIndex属性 Excel VBA教程:LoadPictures属性
Excel VBA教程:LocalConnection属性 Excel VBA教程:Location属性
Excel VBA教程:LocationInTable属性 Excel VBA教程:LocationOfComponents属性
Excel VBA教程:LockAspectRatio属性 Excel VBA教程:Locked属性
Excel VBA教程:LockedText属性 Excel VBA教程:MacroType属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号