Excel и Delphi

[hunter03]

Здравствуйте, столкнулся с такой проблемой:
У меня в excel в столбик записано N чисел. Как извлекти эти числа и записать в массив в delphi?
я нашел как вытянуть данные с конкретной ячейки :

s:=MsExcel.Range['B2'];

а как быть если чисел любое количество?
Если кто-то сталкивался, прошу помочь! Спасибо.

[NetSpace]

а в цикл загнать не прогбовали?

const M=100000;
var s:array[1..M] of Integer;

n:=1;
while (MsExcel.Rangle['B'+IntToStr(n)]<>0)do
begin
   s[n]:=MsExcelRangle['B'+IntToStr(n)]; 
   n:=n+1;
end;

только не помню, он пустую клетку за ноль принимает или нет?

[hunter03]

Что-то не получается, ругается на строку

while (MsExcel.Rangle['B'+IntToStr(n)]<>0)do

Я так подозреваю, что перед тем как считывать данные с ячеек нада активировать лист или что-то в этом духе?
Я пробовал

MsExcel.Workbooks.Sheets('Лист1').Select;

но не получилось

[hunter03]

Все заработало, спасибо!