TextRange.Length Property

Returns the length of the specified text range, in characters. Read-only.

Syntax

expression.Length

expression   A variable that represents a TextRange object.

Return Value
Long

Example
This example sets the title font size to 48 points if the title of slide two contains more than five characters, or it sets the font size to 72 points if the title has five or fewer characters.

Visual Basic for Applications
  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