高手进：如何判断Excel文件中是否存在指定的单元名称？感觉挺难的。。。

Question

本人操作如下：   例如在Excel的A1中输入“序号”,通过Excel菜单“插入-->名称-->定义”将A1命名为“XH”，然后保存为Excel文件，请问，用Delphi打开此文件，如何判断文件中是否存在名称为“XH”的单元，并读出该单元所处的行、列呢？  谢谢！！

Answer 1

var 　　eclApp,WorkBook:Variant; 
　　//声明为OLE Automation 对象 　　xlsFileName:string;
begin 
　　xlsFileName:='ex.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);
    if eclApp.cells(1,1) = 'xxx' then
      showmessage('has item');
    workBook.close;
    eclApp.Quit;
end;

Answer 2

to naughtyboy(一切都是为了明天) :你的方法是找Cell内的内容，解决不了我提的问题咯~~