TextRange.Length Property (PowerPoint)
Returns the length of the specified text range, in characters. Read-only.
expression A variable that represents a TextRange object.
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.
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
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.