ox = CreateObject("Excel.application") ox.Workbooks.Open(FullPath("myfile.xlsx")) ox.ActiveWorkbook.SaveAs("myfile.xls",39) ox.ActiveWorkbook.Close() Import From myfile.xls type xl8 sheet "sheet2"