source는 아래와 같습니다...

근데 원본의 Excel file은 Worksheet가 3개가 되는데...

아래와 같이 쓰면...맨 첫 WorkSheet의 자료만 불러오는데...

WorkSheet2, WorkSheet3의 자료도 받아왔으면 하는데...

혹시 아시는 분 계실까여? -_-;







try

ExcelIns := CreateOLEObject('Excel.Application');

ExcelIns.FindFile;

except

showmessage('MS Excel을 실행할 수 없습니다. '#13#10'MS-Excel이 설치되어있는지 확인하세요');

exit;

end;



for i:= 1 to 10 do //행

begin

for j:= 1 to 10 do //열

begin



if messageDlg(ExcelIns.ActiveSheet.Cells[i, j].Value, mtInformation, [mbOk, mbCancel],0) = mrCancel

then

begin

ExcelIns.Quit;

ExcelIns := null;

exit;

end;

end;

end;



MessageDlg('Excel 불러오기를 완료했습니다.', mtInformation, [mbOk], 0);



ExcelIns.Quit;

ExcelIns := null;