Определяет, сжимается ли
текст автоматически для соответствия ширине столбца. Чтение/запись Boolean
Синтаксис
property ShrinkToFit: Boolean;
Пример
Задаёт свойство ShrinkToFit для ячеек B5:F30 на первом листе
Workbook.Sheets[1].Range['B5','F30'].ShrinkToFit := true;