How to get the name of all possible worksheets in a Microsoft Excel File.
Imports System.IO
Imports System.Data
Imports System.Data.OleDb |
Imports System.IO
Imports System.Data
Imports System.Data.OleDb
Dim con As System.Data.OleDb.OleDbConnection
con = New System.Data.OleDb.OleDbConnection("provider=Microsoft.Jet.OLEDB.4.0;"
& "data source=C:\ExcelFile.xls;Extended Properties=Excel 8.0;")
con.Open()
Dim dtSheets As DataTable =
con.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, Nothing)
Dim drSheet As DataRow
For Each drSheet In dtSheets.Rows
''Here are all your possible worksheets.
''drSheet("TABLE_NAME").ToString()
Next |
Dim con As System.Data.OleDb.OleDbConnection
con = New System.Data.OleDb.OleDbConnection("provider=Microsoft.Jet.OLEDB.4.0;"
& "data source=C:\ExcelFile.xls;Extended Properties=Excel 8.0;")
con.Open()
Dim dtSheets As DataTable =
con.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, Nothing)
Dim drSheet As DataRow
For Each drSheet In dtSheets.Rows
''Here are all your possible worksheets.
''drSheet("TABLE_NAME").ToString()
Next
