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

Как Прочитать данные из ячеек из файла EXCEL?   Найти похожие ветки 

← →
sucer   (2004-03-22 16:18) [0]

Есть файл в формате EXCEL XP.Там один-обычный- екселовский лист.
На листе 8 колонок и 1000 строк.В ячеках находятся строковые
данные.

Кто знает.напишите кусок кода пожалуста!!ПОЖАЛУСТА!! как прочитать данные с этого файла./или ссылку на статью с исходниками.

---

← →
senya   (2004-03-22 16:24) [1]

Типа такого

var
       Excel,WorkBook,Sheet: OLEVariant;
       value : string;
begin
OpenDialog.Filter := "Microsoft Excel files (*.xls)|*.xls";
OpenDialog.FilterIndex := 1;
if OpenDialog.Execute then
begin
  Excel := CreateOleObject("Excel.Application");
  Excel.Workbooks.Open(OpenDialog.FileName, False);
  WorkBook := Excel.WorkBooks.Item[1];
  Sheet := Excel.Application.Worksheets.Item[1];

    for i := 1 to 100 do //номер строки
     for j := 1 to 8 //номер колонки
        value := Trim(Sheet.Cells.Item[i,j].Value);

---

← →
Тимохов ©   (2004-03-22 16:31) [2]

работать медленно будет просто жуть
сильно не уверен, но может можно брать значение из range сразу в вариантный массив. устанавливать значения таким образом можно, а вот можно ли брать - не знаю, не пробовал, можете попробовать. если получится, то работать будет раз 100 быстее.

---

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

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



Память: 0.45 MB
Время: 0.031 c