Текущий архив: 2002.09.16;
Скачать: CL | DM;

Вниз

Понять не могу, как добраться к Excel таблице   Найти похожие ветки 

← →
Valeris   (2002-09-04 22:36) [0]

Как обращаться из Delphi к Excel-таблице с помощью SQL?
Например в Excel-файле есть Лист1 и как мне обратиться к таблице которая лежит в этом листе. В аксесе ведь таблицы имеют имена и можна выполнить select * from TableName, а в Excel как???????
Ниче понять не могу.
Помогите пожалуйста

---

← →
Valeris   (2002-09-05 09:24) [1]

плиз!!!!!

---

← →
Spooky   (2002-09-05 10:06) [2]

Из Delphi к Excel-таблице можно обратиться только через OLE-server. И соответственно далее работать с объектом с помощью Excel-евских методов и свойств (VB). На сколько я знаю для объектов типа WorkBook и Range в VB нет никаких методов для работы с SQL (можешь для гарантии в справке по VB посмотреть).

---

← →
Andy BitOff ©   (2002-09-05 10:37) [3]

Через OLE:

Var
s,s1:string;
a,b:integer;
Excel, WorkBook, Sheet: Variant;
begin
Excel := CreateOleObject("Excel.Application");
try
Excel.WorkBooks.Open(имя_файла);
WorkBook := Excel.WorkBooks.Item[1];
Sheet := Excel.Application.Worksheets.Item["имя_листа"];
//а доступ к таблице
s:= Sheet.Cells[1,2];

....

finally
Excel.WorkBooks.Close;
end;

end;

---

← →
Andy BitOff ©   (2002-09-05 10:37) [4]

Через OLE:

Var
s,s1:string;
a,b:integer;
Excel, WorkBook, Sheet: Variant;
begin
Excel := CreateOleObject("Excel.Application");
try
Excel.WorkBooks.Open(имя_файла);
WorkBook := Excel.WorkBooks.Item[1];
Sheet := Excel.Application.Worksheets.Item["имя_листа"];
//а доступ к таблице
s:= Sheet.Cells[1,2];

....

finally
Excel.WorkBooks.Close;
end;

end;

---

← →
AFrolov ©   (2002-09-05 10:38) [5]

http://www.afalinasoft.com/rus/tips/index.html

---

← →
Valeris   (2002-09-05 11:02) [6]

Спасибо

---

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

Текущий архив: 2002.09.16;
Скачать: CL | DM;

Наверх

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