Мне нужна информация из ячейки Excel-таблицы

← →
v_o_v_a (2006-09-07 09:12) [0]

Здрасте. Мне нужна информация из ячейки Excel-таблицы, подскажите, пожалуйста, как мне это сделать. Спасибо

← →
pavel_guzhanov © (2006-09-07 10:01) [1]

uses ComObj, Excel_TLB;
............................
var
val:String;
m_XLApp, Sheet, Colum:Variant;
begin
// создаём объект Excel
m_XLApp:=CreateOleObject("Excel.Application");
m_XLApp.WorkBooks.Open(GetCurrentDir+"\Blank.xls");// здесь укажешь путь к своему файлу
Sheet:=m_XLApp.Workbooks[1].WorkSheets["Лист1"];// здесь название рабочего листа
Val:=Sheet.Cells[1,1]; // искомое значение из ячейки 1:1
end;

Если файла Excel_TLB нет, то импортируй библиотеку типов: Project->Import Type Library... Выбери в списке Excel и нажми Create Unit...

← →
v_o_v_a (2006-09-07 11:16) [2]

Спасибо, все очень понятно и все работает.
А закрыть книгу надо или не обязательно (глупый вопрос, но...)

← →
pavel_guzhanov © (2006-09-07 11:30) [3]

> А закрыть книгу надо или не обязательно

А тебе очень надо, чтобы запущенный excel торчал в памяти? Вообще-то программа должна за собой убирать после закрытия....

← →
v_o_v_a (2006-09-07 11:33) [4]

Да, конечно. Спасибо.

← →
v_o_v_a (2006-09-07 13:41) [5]

Sorry!
Но я не могу справиться с закрытием excela.
Делаю так:
m_XLApp.Workbooks.Close; m_XLApp.Quit;
а Excel еще долго висит в памяти

← →
v_o_v_a (2006-09-07 13:44) [6]

Нет, вру...
Все впорядке

if not VarIsEmpty(m_XLApp) then begin m_XLApp.DisplayAlerts:=false;// не сохраняем m_XLApp.Quit; end;

Мне нужна информация из ячейки Excel-таблицы Найти похожие ветки