Delphi, поиск в таблице Excel

[BoozZzilla]

Товарищи, перейду к сути сразу - есть таблица в Excel-е, через цикл обращаюсь к ячейкам в одном столбце, беру значение ячейки и сравниваю со своим. Перебор 2,5 тысяч ячеек занимает что то около 10 секунд. И 2,5 тысячи это далеко не предел, будет много и много больше.
Подскажите какой нибудь фокус.
Мне кажется что основная потеря времени происходит во время запроса/ответа. Может можно натравить сам Excel чтобы он поискал у себя на листе и вернул значение сразу?
Или как нибудь по другому может можно ускориться?
Я всё сейчас накрутил на простой текстовый файл, но с экселем и красивее и просто удобнее, дату например пихать в другой столбец.

[Valio]

Я думаю что 2500 записей это работка для БД. Можно или подумать чтоб исходный фаил был уже БД, илиже в начале работы программы перетащить програмно всё в БД.

+ есть вроде какойто экспорт Аксель -> Акцесс.

[BoozZzilla]

Я принимаю к вниманию конечно ваш совет. И я понимаю что он правильный. Но учиться работать с БД я буду не один месяц.
Оно мне потом пригодится, но может будут ещё предложения, может всё таки есть какой нить ход конём чтобы ррраз и всё готово?

[Valio]

А что вообще надо делать с данными?
Какого они типа?

Есть также вариант загрузить, при старте, таблицу экселя в массив и работать уже с массивом.

Да пару дней всего то на БД надо потратить, а дальше только совершенствоваться )

[Mad_Cat]

   
  var Excel: Variant;
{.....}
 function FindExcel(const fnd: string; var aCol, aRow: Word): String;
      var
        wRange: OleVariant;
    begin
      try
        wRange:=Excel.Cells.Find(What:=fnd);
        
        aCol:=wRange.Column;
        aRow:=wRange.Row;
     
        Result:='';
      Except
        on E: Exception do
        Result:=E.Message;
      End;
    end;

(c) Light13

[BoozZzilla]

на двигатели набивается номер
дабы исключить повторение этого номера (в гибдд не поймут) надо его перед набивкой проверять на повторение.
если загружать в массив то есть вероятнось что комп ребутнется/глюканёт/его движком пришибут/метеорит упадёт/да мало ли что и всё - всё несохранённое пропадёт тогда. Потому рассматриваю сразу запись в таблицу, чтобы не хранить.

[Valio]

Помне так это прямая дорога к БД, причём у тебя ерундовая таблица и разобраться с БД и как в ней чтото искать это максимум 2 вечера.

[BoozZzilla]

Огроменное спасибо Mad Cat
всё летает при десяти тысячах записей

Valio также благодарю за активное участие
Я обязательно возьмусь за БД, вот тока время свободное появится и стимул