参考
Dim Book As New XLS.Book("d:\test.xls")Dim ls As new List(Of String)For Each sheet As xls.sheet In Book.Sheets ls.add(sheet.name)Nextmsgbox(ls.Contains("abc"))