xlCalculationAutomatic    = -4105;
   xlCalculationManual    = -4135;

   Попытка
       scr                = СоздатьОбъект("MSScriptControl.ScriptControl");
       scr.language    = "vbscript";
       ExcelApp        = scr.eval("CreateObject(""Excel.Application"")");
   Исключение
       Попытка
           ExcelApp = СоздатьОбъект("Excel.Application");
       Исключение
           Сообщить("Не удалось открыть Excel. " + ОписаниеОшибки());
           Возврат;
       КонецПопытки;
   КонецПопытки;
   
   ExcelApp.Calculation = xlCalculationManual;

Ругается:
ExcelApp.Calculation = xlCalculationManual;
{C:\DOCUMENTS AND SETTINGS\DK\РАБОЧИЙ СТОЛ\EXCEL ДЛЯ ЗАКУПА\ERT\ВЫГРУЗКА В EXCEL 1_8.ERT(873)}: Microsoft Office Excel: Нельзя установить свойство Calculation класса Application
---
Excel 2003 SP2
Где грабли?

Вверх

ждем smaharba

попробуй
ExcelApp.Calculation = -4135;

(3)сорь верх не увидел...


//*******************************************
Процедура Сформировать()
   xlCalculationAutomatic = -4105;
   xlCalculationManual = -4135;
   Попытка
       scr = СоздатьОбъект("MSScriptControl.ScriptControl");
       scr.language = "vbscript";
       ExcelApp = scr.eval("CreateObject(""Excel.Application"")");
       ExcelApp.WorkBooks.Add();
       //Вот это, при таком обращении к ехелю нет книг в контексте
   Исключение
       Попытка
           ExcelApp = СоздатьОбъект("Excel.Application");
       Исключение
           Сообщить("Не удалось открыть Excel. " + ОписаниеОшибки());
           Возврат;
       КонецПопытки;
   КонецПопытки;
   ExcelApp.Calculation = xlCalculationManual;
КонецПроцедуры


(5) работает, теперь поиграем в "Найти 10 отличий"

(7) Спасибо, нашел. Нужно было открыть workbook а уже потом запрещать пересчет.

(7) для (5)