Overflowing Property

       

MsoTrue if the text frame contains more text than can fit into the text frame. Read-only MsoTriState.

MsoTriState can be one of these MsoTriState constants.
msoCTrue Not used with this property.
msoFalse
msoTriStateMixed Not used with this property.
msoTriStateToggle Not used with this property.
msoTrue

expression.Overflowing

expression   Required. An expression that returns one of the objects in the Applies To list.

Example

This example increases the height of the selected text frame if it contains overflowing text.

Sub IncreaseTextBoxHeight()
    With Selection.ShapeRange.TextFrame
        If .Overflowing = msoTrue Then
            Do
                .Parent.Height = .Parent.Height + 36
            Loop Until .Overflowing = msoFalse
        End If
    End With
End Sub