Фильтр с combobox в excel

[VinDiz]

Суть заключается в том что, я в комбобоксе выбираю слово и это слово должно найти в БД если нашло то выдает сообщение! Помогите пожалуйста, все описано вроде верно, компиляция проходит, но при нажатии кнопки с функцией выбивает обходной класс EOleException почитал про него, правда мало что понял (пишет используется неправильный интрерфейс Ole), подкоректируйте пожалуйста! Вот код функции:

procedure TForm3.Button1Click(Sender: TObject);
   var A, B: word;
      XS: variant;
begin
  XS:= CreateOleObject('Excel.Application');
  XS.Workbooks.Open('222.xls',0,true);  // не отображается таблица
  XS.DisplayAlerts := False; // отключение запроса на сохранение
  A:=XS.Range['B2:B11'];
  B:=combobox2.ItemIndex;
  if A = B then
  begin
  showmessage ('gfgfg');
  end;
  XS.Application.Quit;
end;