ShrinkToFit Property
Applies To
Range object, Style object.
Description
True if text automatically shrinks to fit in the available column width. Returns Null if this property isn't set to the same value for all cells in the specified range. Read/write Variant.
Example
This example causes text in row one to automatically shrink to fit in the available column width.
Rows(1).ShrinkToFit = True