Скачать: CL | DM;

Как достать картинку из Excel документа   Найти похожие ветки 

← →
Ragazor   (2004-08-28 19:03) [0]

сабж

---

← →
YurikGL ©   (2004-08-30 07:26) [1]

Как вариант запустить Excel потом нужную картинку сделать select а потом copytoclipboard

---

← →
VMcL ©   (2004-08-30 10:17) [2]

Как-то так, вроде:

ActiveSheet.Shapes(...).Select
Selection.Copy

---

← →
Ragazor   (2004-08-30 11:20) [3]

хммм...
А если картинка не одна, тоесть типа нужно выбрать картинку с нужным названием и потом копировать.

---

← →
Ragazor   (2004-08-30 11:36) [4]

ActiveSheet.Shapes(...).Select
такой синтаксис требует "member not found"

---

← →
YurikGL ©   (2004-08-31 10:45) [5]

> Ragazor   (30.08.04 11:36) [4]

Сделай макрос и посмотри его синтаксис

---

← →
Ragazor   (2004-09-03 12:18) [6]

я сделал, там надо вписать типа имя картинки вида "Картинка1"
но в делфи так не проходит.

---

← →
YurikGL ©   (2004-09-03 13:35) [7]

> Ragazor   (03.09.04 12:18) [6]

А что делфи пишет?

На всякий случай попробуй
ActiveSheet.Shapes.item("Картинка 1").Select

На будущее, берешь компонент ExcelWorkSheet, нажимаешь ctrl+пробел и смотришь появившийся список, потом ExcelWorkSheet.Shapes и тоже Ctrl+пробел.... Много нового узнаешь.

---

← →
Ragazor   (2004-09-03 13:55) [8]

а я прбовал
ActiveSheet.Shapes("Картинка 1").Select
:)

---

← →
Ragazor   (2004-09-03 14:30) [9]

form1.Worksheet.Shapes.Item("Picture5").Select(pic);
вроде так должно быть, PIc: OLEVARIANT

А как потом его скинуть в файл или, например, в Имейдж.

---

← →
YurikGL ©   (2004-09-03 15:27) [10]

Как вариант - через буфер.

---

← →
Ragazor   (2004-09-05 13:54) [11]

Excel.ActiveSheet.Shapes.Item("Picture 5").Select;
Excel.Selection.Copy;
Form1.Image1.Picture.Assign(Clipboard);

вот так работает 100%

Excel:olevariant

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.027 c