Прайс-лист с картинками в примечании (Эксель)

Опубликовал Евгений (jooce) в раздел Обработки - Ценообразование, прайсы

Прайс-лист с картинками в примечании (Эксель)

Прайс формируется в Экселе, а в сноске на примечание картинка товара.

Скачать файлы

Наименование Файл Версия Размер
ПечатьПрайсЛиста(Картинки).epf
.epf 168,86Kb
04.10.16
303
.epf 168,86Kb 303 Бесплатно

См. также

Комментарии
1. Dmitry Afanasyev (afanasko) 35 19.08.10 16:41 Сейчас в теме
Хорошая вещь, я тоже как-то с этим возился, только не в комменты, а в ячейку картинки вставлял )
2. AlexanderSM AlexanderSM (AlexanderSM) 101 19.08.10 17:40 Сейчас в теме
Хорошо, но такой прайс клиенту не отправишь.
kostyaomsk; jooce; +2 Ответить 2
3. Александр Цегельников (markers) 186 19.08.10 20:20 Сейчас в теме
(0) Подскажите, а встроенное в Excel сжатие картинок используется? И как осуществляется выгрузка через COM ?
4. Евгений (jooce) 25 19.08.10 23:32 Сейчас в теме
(2) Я выкладываю то что сам делал по заказу. Если что-то нужно для Вас доделывайте и допиливайте!!
5. Евгений (jooce) 25 19.08.10 23:34 Сейчас в теме
(3) Никакого сжатия не используется. Выгрузка не осуществляется, а на прямую в Эксель пишется (Открывается книга и прорисовывается)!!!
6. Виктор (vivm) 26.08.10 09:51 Сейчас в теме
Гораздо удобнее вставить гиперссылку на картинку чтобы при нажатии на названии товара она открывалась.
kostyaomsk; +1 Ответить
7. Оксана Оксана (0xana1) 25.10.11 12:08 Сейчас в теме
у меня ошибка лезет

{ВнешняяОбработка.ПечатьПрайсЛиста(1184)}: Ошибка при установке значения атрибута контекста (Value): Произошла исключительная ситуация (0x800ac472)
ExcelApp.Cells(Сч,СчКол).Value=Строка(СекцияТипЦен.Параметры.Единица);
по причине:
Произошла исключительная ситуация (0x800ac472)

вроде что-то выгружается, но не все
8. Туркин Алексей (cshysq) 19.01.12 23:49 Сейчас в теме
(2) AlexanderSM,
такой прайс можно "распечатать" в pdf. Тогда он и весить будет меньше и к отпрвке будет удобен
9. Сергей Зеленовский (zels) 153 09.07.12 13:23 Сейчас в теме
Интересно, можно сделать так, чтобы картинка показывалась ниже (и не закрывала текущую строку).
10. Тима Осипов (net7wolf) 46 23.10.12 09:30 Сейчас в теме
Не верное отображение картинок (Растянуто)
11. Alex Dats (irbis_triffle) 1 19.12.12 16:07 Сейчас в теме
Да, EXCEL никогда не отличался корректностью размеров картинок. Но это можно исправить - после строки
ExcelApp.Cells(Сч,СчКол).Comment.Shape.Fill.UserPicture(ПутьДляСохранения+"\"+Выборка.Номенклатура.Код+".bmp");
(строка 1122 в модуле объекта обработки)
добавить:
// Обращаемся к объекту сохраненной картинки:
ФайлКартинка = Новый COMОбъект("WIA.ImageFile");
ФайлКартинка.LoadFile(ПутьДляСохранения+"\"+Выборка.Номенклатура.Код+".bmp");
// аккуратненько устанавливаем размеры примечания:
Попытка 
ExcelApp.Cells(Сч,СчКол).Comment.Shape.Height = ФайлКартинка.Height;
ExcelApp.Cells(Сч,СчКол).Comment.Shape.Width = ФайлКартинка.Width;
Исключение
КонецПопытки;
...Показать Скрыть