//도움이되시길바랍니다
if OpenDialog1.Execute then
begin
   Gauge1.Progress := 0;
   I := 0;

   with ADOQuery1 do
   begin
     close;
     ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' +
                                  OpenDialog1.FileName+ ';Extended
                                  Properties=Excel
                                  8.0;Persist Security Info=False';
     SQL.Clear;
     SQL.Text := 'SELECT * FROM [Sheet1$]';   //Sheet1 는 엑셀 파일중에
     오픈할 페이지의 이름입니다.
     open;


   end;
end;

화면에 ADOQuery하나랑 데이타소스하나랑 디비그리드랑
오픈다이알로그 하나를 갔다 놓으신후 테스트해보세요

전 엑셀 데이타 이렇게 가지고오거든요.

도움이 되셨으면 합니다.
즐코하세요.

Excel 도 하나의 table 로 보시면 될듯합니다.

TDatabase 로 엑셀을 여실수 있습니다.(driver 가 깔려 있어야 겠죠)

또는 bde alias 로 등록하실수 잇습니다.

또 dsn 으로 연결도 됩니다.

엑셀 구조가 Table 구조와 비슷해야겠죠.

첫번째 로우는 필드

두번째 로우부터는 레코드...(데이타)

이렇게 해서 datasource 로 grid 를 연결시켜 주면 됩니다.

올리는 방법은 TBatchmove 를 help 에서 찾아보세용. 아주 쉽습니다.

다른 방법은 델파이에 같은 들어가 잇는 datapump 라는 유틸을 이용하는것입니다.

너무 쉽게 올릴수 있습니다.