Question

I’m connecting to Excel with ADO, but it only works if I specify the sheet names. I won’t know those at runtime. Is there any method to get the sheet names? Excel automation?

Thanks.

Answer 1

Once you’ve open the ADO connection, you need call the OpenSchema() method which returns a results set with the sheet names as "table_name"

I’m a bit rusty with VBA but that should look something like that

Dim oConn
DIm oRs
Set oConn = New ADODB.Connection
Dim sConn
sConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=somepathtoXLS; xxx not sure some other connection str props..."
oConn.Open sConn

Set oRS = oConn.OpenSchema(adSchemaTables)
Do While Not oRS.EOF 
   sSheetName = oRS.Fields("table_name").Value
   '// do something with the sSheetName
   oRS.MoveNext
Loop