//将函数设置为本地执行，取Excel文件中的sheet数量
LJ:="E:\\TestExcel\\TslRW01.xlsx";
  obj:=CreateObject('TxlsReadWrite');
  obj.LoadFromFile("",LJ);//加载excel文件
  return obj.count;