Вывод картинки

// Вставляем картинку в место, где спозиционирован курсор и выделяем ее ЛистНовый.Pictures.Insert(Путь).Select();// Узнаем высоту картинки, если больше 80, то уменьшаем до 80 Если Число(ExcelApp.Application.Selection.ShapeRange.Height())>80 Тогда ExcelApp.Application.Selection.ShapeRange.Height=80;КонецЕсли; // Узнаем высоту картинки PictureHeight=ExcelApp.Application.Selection.ShapeRange.Height(); // Устанавливаем туже высоту, для строки под картинкой ЛистНовый.Rows(СтрокаНач).RowHeight = PictureHeight;// добавляем гиперссылку к картинке ЛистНовый.Hyperlinks.Add(ExcelApp.Application.Selection.ShapeRange.Item(1),ВыборкаСсылка.url);

Вариант 2

// Получаем основное изображение номенклатуры.ИзображениеТовара = Номенклатура.ОсновноеИзображение.Хранилище.Получить(); Если ЗначениеЗаполнено(ИзображениеТовара) Тогда // Даём имя временному файлу. ИмяФайла = "PicForExcel"; ВременныйФайл = ПолучитьИмяВременногоФайла("jpg"); // Записываем временный файл на диск. ИзображениеТовара.Записать(ВременныйФайл); // Получаем координаты для левого верхнего угла изображения. Верх = Лист.Cells(СтрокаПрайса, ТекущаяКолонка).Top; Лево = Лист.Cells(СтрокаПрайса, ТекущаяКолонка).Left; // Используем метод AddPicture и добавляем картинку в координаты с размером картинки 100 на 100. // Сама картинка, при этом, не теряет своего настоящего разрешения, просто подгоняется под указанные размеры. Лист.Shapes.AddPicture(ВременныйФайл, Ложь, Истина, Лево, Верх, 100, 100); // Удаляем временный файл с диска. УдалитьФайлы(ВременныйФайл); КонецЕсли;