Код:
&НаСервере
Процедура ВыгрузитьНаСервере()
  
    ТзПодразделенийОрганизации = Объект.ТаблицаSMD;
    
    Попытка
        Эксель = Новый COMОбъект("Excel.Application");
    Исключение
        Сообщить(ОписаниеОшибки());
        Возврат;
    КонецПопытки;
    
    Книга = Эксель.WorkBooks.Add();
        
    Лист = Книга.WorkSheets(1);
    Лист = Книга.Sheets.Add();
    
    НомерСтроки = 1;
    Для Каждого Строка ИЗ Объект.ТаблицаSMD Цикл
        Лист.Cells(НомерСтроки, 1).Value = Строка.Designator;
        Лист.Cells(НомерСтроки, 2).Value = Строка.MyData;
        Лист.Cells(НомерСтроки, 3).Value = Строка.Номенклатура;
        Лист.Cells(НомерСтроки, 4).Value = Строка.Quantity;
        НомерСтроки = НомерСтроки + 1;
    КонецЦикла;
    
    Попытка
        Книга.SaveAs("C:\1c");
    Исключение
        Сообщить(ОписаниеОшибки()+" Файл не сохранен!");
    КонецПопытки;
    
    Эксель.Application.Quit();
    
КонецПроцедуры

Почемуто выдает ошибку : {Справочник.СпецификацияТК.Форма.ФормаЭлемента.Форма(194)}: Ошибка при установке значения атрибута контекста (Value)
        Лист.Cells(НомерСтроки, 3).Value = Строка.Номенклатура;
по причине:
Произошла исключительная ситуация (0x800a03ec)
Произошла исключительная ситуация (0x800a03ec)
Кто знает в чем дело?

подозреваю что эксель не очень хочет кушать в качестве значения ссылку на номенклатуру.

(0) А нафига так делать-то? Сделай обычный отчёт, сохрани в формате Excel.

(0) Подозреваю, что знает в чём дело только отладчик, но он не "кто", а "что", но - помогает.
Какое значение передаётся в ячейку в момент возникновения ошибки?

(2) Мне нужно чтобы выгрузка была  по Событию нажатия кнопки

(4) И что? Сформируй обычный отчёт в ТабличныйДокумент, сохрани его в Excel программно.

http://g.zeos.in/?q=0x800a03ec

Тормозится на Лист.Cells(НомерСтроки, 3).Value = Строка.Номенклатура;

Коментирую  эту строку ://Лист.Cells(НомерСтроки, 3).Value = Строка.Номенклатура; выгружает всё отлично:)
http://lvkr.ru/f/UgkGRF/1280.jpg

Тормозится на Лист.Cells(НомерСтроки, 3).Value = Строка.Номенклатура.Наименование;
попробуй

(8) Круто помогло ! :) спасибо :)))

У... всего с третьего раза))

Извращенцы. Есть готовый инструмент, нет, надо всё руками в Excel фигачить...

(11) ну кстати, руками в эксель можно такого понапихать, чего "готовыми инструментами" не сделать.

(12) Можно, но в (0) я такого не наблюдаю.

Лист.Cells(НомерСтроки, 3).Value = Строка.Номенклатура.наименование;

Лист.Cells(НомерСтроки, 3).Value =""+ Строка.Номенклатура.наименование;

Лист.Cells(НомерСтроки, 3).Value =""+ Строка.Номенклатура;

(8) не прочитал