ЭтикеткиБланк=Новый COMОбъект("Excel.Application");
   ЭтикеткиБланк.Workbooks.Open("C:\...\Этикетки.xlsm");
   Колонка=1;
   Строка=1;
   Для каждого .....Цикл
       ...
   КонецЦикла;
   ЭтикеткиБланк.Run("PrintBook");
В Excel все нормально (печатает книгу, и закрывает ее без изменений),
а затем 1С выдает: Произошла исключительная ситуация (0x800a9c68)
Ошибка при вызове метода контекста (Run)

а рун делаешь только ради печати?

может ЭтикеткиБланк.PrintOut() ?

Ну да, мне там еще подсчитать количество листов нужно, как в 1с это сделать не знаю а в EXCEL знаю :), вот и решил это дело с EXCEL творить

А может как то проигнорить эту ошибку

"В Excel все нормально (печатает книгу, и закрывает ее без изменений)" - скрипт на басике?

токо как

Да на басике

Sub PrintBook()
i = 1
If [A73] <> "" Then i = 2
If [A143] <> "" Then i = 3
If [A213] <> "" Then i = 4
If [A283] <> "" Then i = 5
If [A353] <> "" Then i = 6
ActiveWindow.SelectedSheets.PrintOut From:=1, To:=i, Copies:=1
ThisWorkbook.Close (0)
End Sub

Может лучше это повторить в 1С?

А может 1С ругается из за того, что EXCEL и связь обрывается

А может 1С ругается из за того, что EXCEL закрывает книгу и связь обрывается

"Может лучше это повторить в 1С?"- не знаю как

попробуй в скрипте убрать клозе

и в 1с закрыть?

да просто попробуй, будет ругаться или нет

ЭтикеткиБланк=Новый COMОбъект("Excel.Application");
   ЭтикеткиБланк.Workbooks.Open("C:\...\Этикетки.xlsm");
   Колонка=1;
   Строка=1;
   Для каждого .....Цикл
       ...
   КонецЦикла;
   ЭтикеткиБланк.Run("PrintBook");
   ЭтикеткиБланк.Close(0);

Ругается:
Метод объекта не обнаружен (Close)
   ЭтикеткиБланк.Close(0);

ЭтикеткиБланк.Workbooks.Close(0); ?

ЭтикеткиБланк.Workbooks.Close(0); ?-Неверное число параметров

ЭтикеткиБланк.Close(0);-Метод объекта не обнаружен (Close)

ЭтикеткиБланк.Workbooks.Close(); ?

ЭтикеткиБланк.Workbooks.Close(); ?-Метод объекта не обнаружен (Close)

ЭтикеткиБланк.Workbook.Close();  ?

quit()

v8: Как закрыть книгу Excel, открытую через COM-соединение?
http://www.google.ru/search?as_sitesearch=forum.mista.ru&q=%EA%E0%EA+%E7%E0%EA%F0%FB%F2%FC+%EA%ED%E8%E3%F3+excel

Еще вариант:
ЭтикеткиБланк = Неопределено;

quit() -закрывает, но предварительно спрашивает "сохранить изменения или нет?", а мне нужно что бы "молча" закрыл без изменений quit(0) не срабатывает-Неверное число параметров

v8: Как закрыть книгу Excel, открытую через COM-соединение?

(26) displayalerts

v8: Как закрыть книгу Excel, открытую через COM-соединение?

ЭтикеткиБланк.Run("PrintBook");
   ЭтикеткиБланк.Application.DisplayAlerts = Ложь;
   ЭтикеткиБланк.quit();
Все ОК.
depthzer0 болшьое спасибо!

(30) а я не считаюсь, да?

Wobland, извини за невнимательность. Конечно считаешься :).

Дубыль 2

ЭтикеткиБланк.Run("PrintBook");
   ЭтикеткиБланк.Application.DisplayAlerts = Ложь;
   ЭтикеткиБланк.quit();
Все ОК.

Wobland,depthzer0 большое спасибо!