求助：如何取得excel文件中sheet的名字

Question

要求功能是这样的，
  myBook = myApp.Workbooks.Open(_strNewExcelPath & k + 1 & ".xls", oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing)
读出book以后，我用下面这个sheets(1)得到了第一个sheet，名称是data,问题在于，名为data的sheet页并不总是在第一列，我如何得到这个名为data的sheet页呢.
   mySheet = CType(myBook.Sheets(1), Excel.Worksheet)
刚试着用
                mySheet = CType(myBook.Sheets("data$"), Excel.Worksheet)没有搞定.

Answer 1

循环。
for(...)
{
　　if (xx.Name.ToUpper()=yourSheetName)
　　{
　　}
}