I use the following type of code to retrieve data from some Excel Workbooks (path is a Parameter)
Dim strSQL As String, conStr as String
Dim cnn As New ADOD
Use a named or unnamed range in your query:
strQuery = "SELECT * FROM MyRange"
strQuery = "SELECT * FROM [Sheet1$A1:B10]"
See these Microsoft support articles for more information:
How To Use ADO with Excel Data from Visual Basic or VBA
ExcelADO demonstrates how to use ADO to read and write data in Excel workbooks