Resize a shape or text box to fit its text

1. Select the AutoShape or text box you want to resize.
2. Double-click the selection rectangle of the AutoShape or text box, and then click the Text Box tab in the Format dialog box.
3. Select the Resize AutoShape to fit text check box.