关于取EXCEL中的内容的问题！看看我的程序问题在那里！

[paulzhang]

为了取出EXCEL中的内容，我先做了一个往已经存在的EXCEL文档中修改内容的程序！是可行的，程序修改了cells(2,1)cells(2,2)中的内容。如下：
procedure TForm1.Button2Click(Sender: TObject);
var
eclApp,WorkBook:Variant;
xlsFileName:string;
i:integer;
begin
xlsFileName:='aa.xls';

try
//创建OLE对象Excel Application与 WorkBook
eclApp:=CreateOleObject('Excel.Application');
WorkBook:=CreateOleobject('Excel.Sheet');
except
ShowMessage('您的机器里未安装Microsoft Excel。');
Exit;
end;

WorkBook:=eclApp.workBooks.Open(xlsFileName);

eclApp.Cells(2,1):='000003'; //1
eclApp.Cells(2,2):='zyl'; //2

WorkBook.save; //3
WorkBook.Close;
eclApp.Quit;
//退出Excel Application
//释放VARIANT变量
eclApp:=Unassigned;
end;

可是，我现在要取出cells(2,1)中的内容，于是，我将程序1、2部分改为label1.caption:=eclApp.Cells(2,1),去掉3部分，结果就不行了，告诉我‘对象找不到’我搞不懂了：eclApp.Cells(2,1)难道只能赋值，不能取值吗？哪位高手指点下！！谢谢！

[ltmb118]

录制一下vba

[paulzhang]

楼上的！什么意思？详细点好阿？

[paulzhang]

不要沉下去！！顶！

[wdsimon]

label1.caption:=eclApp.Cells[2,1].value;

[gmmy0727]

to ltmb118()
可以详细点吗，如何录制vba