|
Прайс в формате Excel с картинками. | ☑ | ||
---|---|---|---|---|
0
DGorgoN
26.07.13
✎
11:18
|
Вопрос к знатокам VBA и Excel.
Хочу сделать прайс в Excel с картинками, которые будут лежать рядом с ним. Прайс с картинками, которые сохраняются в самом файле я уже сделал - файл открывается долго. Код для данного внедрения: ИмяФайла = "C:\models2\"+Прав("000000"+СокрЛП(сКод), 5)+".jpg"; ЯчейкаКартинки = Екс.ActiveSheet.Cells(лчСчетчик, 3); ЯчейкаКартинки = Екс.ActiveSheet.Cells(лчСчетчик, 3); Екс.ActiveSheet.Pictures.Insert(ИмяФайла).Select(); СчExcelСтрок = лчСчетчик; ШиринаИзобр=Екс.Selection.Width; ВысотаИзобр=Екс.Selection.Height; Екс.Selection.Delete(); ШиринаКартинки = 10; ВысотаКартинки = 10; Екс.ActiveSheet.Cells(СчExcelСтрок,3).AddComment(); Екс.ActiveSheet.Cells(СчExcelСтрок,3).Comment.Text(" ",1); Екс.ActiveSheet.Cells(СчExcelСтрок,3).Comment.Shape.AlternativeText=""; Екс.ActiveSheet.Cells(СчExcelСтрок,3).Comment.Shape.AutoShapeType=5; Екс.ActiveSheet.Cells(СчExcelСтрок,3).Comment.Shape.Width=400; Екс.ActiveSheet.Cells(СчExcelСтрок,3).Comment.Shape.Height=300; Екс.ActiveSheet.Cells(СчExcelСтрок,3).Comment.Shape.Fill.Visible=-1; Екс.ActiveSheet.Cells(СчExcelСтрок,3).Comment.Shape.Fill.UserPicture(ИмяФайла); Екс.ActiveSheet.Cells(СчExcelСтрок,3).Value = "v"; Возможно ли сделать так, что бы картинки подгружались динамически из внешний файлов. Прайс собираюсь записывать на диск с картинками. |
|||
1
sda553
26.07.13
✎
11:21
|
(0) Я бы html туда врезал, а в html был бы <img> вот и получилось динамически
|
|||
2
Утконос
26.07.13
✎
11:23
|
(0) мне вот эта штука здорово помогла с размером файла
- правда на клюшках, но смысел понятен В 60 !!! раз сжимаем файл MS EXCEL с картинками (созданный программно из 1С) http://infostart.ru/public/19977/ |
|||
3
DGorgoN
26.07.13
✎
12:35
|
(1) В смысле?
|
|||
4
sda553
26.07.13
✎
13:11
|
(3) В смысле того, что сделал бы вместо Excel файла, html файл, который, между прочим, можно успешно открывать в екселе.
В этом случае и картинки будут снаружи, и подгружаться они будут динамически |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |