Нижеописанный вариант для Write не прокатил, хотя в макросах вроде те же методы.
Код: Выделить всё
OOCalc.AutoFit PROCEDURE
CODE
SELF.SetParam('Name', 'aExtraWidth')
SELF.SetParam('Value', 0 ,OO_DATATYPE:LONG)
SELF.ExecuteDispatch('.uno:SetOptimalColumnWidthDirect')