excel 2010 ole自动化工作表超出范围

当我运行下面的vbs时，它可以在我的Excel 2003,2007 PC上显示Excel。
但它不会在任何Excel 2010 PC上运行，并在第5行显示错误“….超出范围”。

Dim xlsApp, xlWorkBook, xlWorkSheet Set xlsApp = CreateObject("Excel.Application") Set xlWorkBook = xlsApp.Workbooks.Add Set xlWorkSheet = xlWorkBook.Worksheets.Item("Sheet1") <===this line error xlsApp.Visible = True 

哪里不对 ？

编辑从波特兰亚军尝试build议后：

尝试后设置xlWorkSheet = xlWorkBook.Sheets（“Sheet1”）
它显示相同的错误。

当我尝试设置xlWorkSheet = xlWorkBook.Worksheets.Add
它现在可以显示Excel，但重点在于新的“工作表4”。 从2007年到2010年有什么变化，我找不到任何来自微软的变化通知。