我正在使用 ADO 连接到 Excel,但只有在指定工作表名称时它才有效。我在运行时不会知道这些。有什么方法可以获取工作表名称吗? Excel 自动化?
谢谢。
最佳答案
打开 ADO 连接后,需要调用 OpenSchema() 方法,该方法返回工作表名称为“table_name”的结果集
我对 VBA 有点生疏,但看起来应该是这样的
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
关于vba - 使用 ADO 连接到 Excel - 不知道工作表名称,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/1397158/