Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / FoxPro, Visual FoxPro Новый топик    Ответить
 Вставить картинку в эксель  [new]
newalex
Member

Откуда: Москва
Сообщений: 33
Искал, но не нашел

необходимо вставить картинку в эксель ну или много картинок
есть
oExl=CREATEOBJECT("Excel.Application")
oExl.WorkBooks.ADD
oExl.WorkSheets(1).ACTIVATE
oSheet=oExl.ActiveSheet

oSheet.sHapes.AddPicture("c:\test.jpg",.T.,.T.,14,14,14,14)

вот shape нашел как вставить, а что бы картинку да в конкретную ячейку никак
пробовал
osheet.PictureS.Insert("test.jpg")
osheet.cells.addpicture('test.jpg')

не получается... помогите плиз

я не волшебник, я только учусь
27 ноя 08, 21:51    [6497429]     Ответить | Цитировать Сообщить модератору
 Re: Вставить картинку в эксель  [new]
newalex
Member

Откуда: Москва
Сообщений: 33
вот получилось
osheet.PictureS.Insert("test.jpg") -
работает если указать полный путь к файлу

но вставляет всегда в одно место без относительности к тому какая ячейка активна

как заставить что бы ставилось в определенное место я файле экселя?
27 ноя 08, 22:16    [6497502]     Ответить | Цитировать Сообщить модератору
 Re: Вставить картинку в эксель  [new]
проходящий.
Guest
newalex
вот получилось
osheet.PictureS.Insert("test.jpg") -
работает если указать полный путь к файлу

но вставляет всегда в одно место без относительности к тому какая ячейка активна

как заставить что бы ставилось в определенное место я файле экселя?

Хм, а точно можно такое сделать?
27 ноя 08, 23:21    [6497724]     Ответить | Цитировать Сообщить модератору
 Re: Вставить картинку в эксель  [new]
newalex
Member

Откуда: Москва
Сообщений: 33
Получилось , через
With
...cells.range(crange).left
...cells.range(crange).top
endwith

Осталось тока каким то образом картинки сжимать, а то файлы здоровые получаються
как уменьшить размер? Тут
27 ноя 08, 23:22    [6497731]     Ответить | Цитировать Сообщить модератору
Все форумы / FoxPro, Visual FoxPro Ответить