关于Excel控制，如何判断Excel中worksheets 的名字是否已经存在？

Question

如题：
能判断是否已经存在，如果存在就不用新建，如果不存在，就新建..
不甚感激

Answer 1

var
  eclApp, WorkBook : Variant;eclApp := CreateOleObject('Excel.Application');
WorkBook := CreateOleobject('Excel.Sheet');
Result := False;
for i:=0 to WorkBook.WorkSheets.Count-1 do
    if WorkBook.WorkSheets[i].Name = 'The Sheet' then
    begin
        Result := True;
        break;
    end;

Answer 2

我想要的是API，不是这样的循环，这样做程序的效率不行

Answer 3

看 excl的帮助吧。。 有详细的对象 

Answer 4

直接select这个name的worksheet，看成功不成功喽