FServiceManager := CreateOleObject('com.sun.star.ServiceManager');
Desktop := FServiceManager.createInstance('com.sun.star.frame.Desktop');

Document := Desktop.LoadComponentFromURL(private:factory/scalc, '_blank', 0, vArr);

cell:=Document.StyleFamilies.getByName('PageStyles').getByName('Default');
  cell.ScaleToPagesX:=1;
  cell.ScaleToPagesY:=1;