FitText Property Example

This example sets the first cell in the selection to automatically fit typed text within its width.

Selection.Cells(1).FitText = True