>>oExcel = CreateObject("Excel.Application") >>oWorkbook = oExcel.Workbooks.Open(lcXlsFile) >>FOR i= 1 TO oWorkbook.Sheets.Count >> ? oWorkbook.Sheets(i).Name >>ENDFOR >>oExcel.Quit() >>