如何得到当前sheet的名称

当我用com打开excel文件时候，我怎么可以得到当前所在sheet的名称或者是知道它是第几个sheet?    Excel := CreateOleObject('Excel.Application');
  Excel.visible :=false ;
  Excel.WorkBooks.Open(FilePath);
  SheetName :=Excel.WorkSheets[1].Name;
这个只可以得到第一个sheet的名称，怎么才可以得到当前sheet的名称．