Determines if
text automatically shrinks to fit in the available column
width. Read/write Boolean. Default value is False.
Syntax
property ShrinkToFit: Boolean;
Example
This example sets ShrinkToFit property for the cells B5:F30 on sheet one.
Workbook.Sheets[1].Range['B5','F30'].ShrinkToFit := true;