Using ADO within an XLS file

[bdbBear]

I have some ADO code within an Excel file (2003) to query data from another Excel file (see below). My question is, how do I grab data from within the same Excel file? What do I set as the connection?

Dim cn As ADODB.Connection
Set cn = New ADODB.Connection

Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset

With cn
.Provider = "Microsoft.Jet.OLEDB.4.0"
.Properties("Extended Properties").Value = "Excel 8.0"
.Open namePath & nameFile
End With

rs.Open q, cn, adOpenStatic

 

[SkipVought]

Path & filename of your workbook.

Have you tried using MS Query via Data/Get External Data/New Database Query...?



Skip,
[sub]
[red]Be Advised![/red]
The band of elderly oriental musicians, known as Ground Cover, is, in reality...
Asian Jasmine![/sub]

 

[PHV]

Have a look at the FullName property of the Workbook object.

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[bdbBear]

PHV,

FullName worked!

Thanks!