True if the size of the specified object is changed automatically to fit text within its boundaries. Read/write Boolean .
expression . AutoSize
expression A variable that represents a TextFrame object.
This example adjusts the size of the text frame on shape one to fit its text.
Worksheets(1).Shapes(1).TextFrame.AutoSize = True