7

I have a workbook with multiple sheets, and each sheet has the same set of named ranges (IE they are scoped to the sheet, not workbook).

I want to query based on a named range on any of the sheets. Some sheets have names with no spaces, and others do have names with spaces.

I can easily do this for the ones with no space, but the syntax for doing this with spaces escapes me (and an hour of google-ing).

The named range is "Ingredients" and one sheet is named "NoSpaces", the other "With Spaces"

Here's the code that works fine for "NoSpaces" sheet:

sConnString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & dictNewRecipesToCheck(arrKeys(0)) & ";Extended Properties=""Excel 12.0;HDR=No;IMEX=1;"""
strQuery = "Select * from [NoSpaces$Ingredients]"
Set objConn = New ADODB.Connection
Set objRecordSet = New ADODB.Recordset
objConn.Open sConnString
objRecordSet.Open strQuery, objConn

I've tried all the following for the "With Spaces" sheet:

strQuery = "Select * from [With Spaces$Ingredients]"
strQuery = "Select * from ['With Spaces'$Ingredients]"
strQuery = "Select * from ['With Spaces$'Ingredients]"
strQuery = "Select * from [With_Spaces$Ingredients]"

Every time, I'm getting "The Microsoft Access database engine could not find the object ..." error.

As as I mentioned, it works fine for all sheets that don't have spaces in the name.

Any help to get this working on sheets with spaces, would be MUCH appreciated.

Thanks!

UPDATES BASED ON COMMENTS BELOW:

Excel 2007

sConnString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & strFileLoc & ";Extended Properties=""Excel 12.0 Macro;HDR=No;IMEX=1;"""

When run through the schema code provided by @shahkalpesh it lists TABLE_NAME as just "Ingredients" for both named ranges (even though each are scoped to a different sheet).
With this driver, even [NoSpaces$Ingredients] doesn't work.

sConnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strFileLoc & ";Extended Properties=""Excel 8.0;HDR=No;IMEX=1;"""

When run through the schema code provided by @shahkalpesh it lists TABLE_NAME as "NoSpaces$Ingredients" and "'With Spaces'$Ingredients". With this driver, [NoSpaces$Ingredients] works fine (it didn't with ACE driver).
However, using the exact name as reported by schema, ['With Spaces'$Ingredients] doesn't work.

Excel 2013

sConnString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & strFileLoc & ";Extended Properties=""Excel 12.0 Macro;HDR=No;IMEX=1;"""

When run through the schema code provided by @shahkalpesh it lists TABLE_NAME as "NoSpaces$Ingredients" and "'With Spaces$'Ingredients". With this driver, [NoSpaces$Ingredients] works fine, but ['With Spaces'$Ingredients] doesn't work.

Finally, please refer to http://db.tt/3lEYm2g1 for an example sheet created in Excel 2007 that has this issue on (at least) 2 different machines.

1
  • Using Excel 2013 I have solved the problem by introducing a regular range (not a named range) AND employing a colon (":"). E.g. [Report 1$A15] would not work, but [Report 1$A15:A15] works. Commented Sep 10, 2015 at 4:42

6 Answers 6

8

Would it be possible to use an excel range instead of named range? I got the following to work:

SELECT * FROM [Report 1$A4:P]

I'm getting the sheet name from the GetOleDbSchemaTable() method and removing the apostrophes. The sheetname with apostrophes does not work for me with a range.

if (tableName.Contains(' '))
            tableName = Regex.Match(tableName, @"(?<=')(.*?)(?=\$')", RegexOptions.None).Value + "$";
Sign up to request clarification or add additional context in comments.

1 Comment

Thank you. I was having the same issue as the OP and I can confirm removing the surrounding quotes in cases where you're selecting a range works.
0

Below query would work. Just make sure the named range Ingredients exist in sheet With Space. Also save the workbook.

strQuery = "Select * from [With Spaces$Ingredients]"

Alternatively you can use below

strQuery = "Select * from [With" & Chr(32) & "Spaces$Ingredients]"

7 Comments

that was the first thing I tried...see list of queries from my original post. Chr(32) doesn't make a difference unfortunately.
@user2229491 Its working at my end. Which version of excel you are using?
The microsoft access database engine could not find the object ''With Blanks$'Ingredients'. Make sure the object exists and that you spell its name and the path name correctly.
@user2229491 the error message itself is self explanatory.Can u convert the file in 2010 version and try it. Also can u upload the file and give us the link.
I created another example on my computer at work (which uses Excel 2007). Still having the issue (and oddly, same issue with NoSpaces). Created easy to run examples of each, just download and edit the file location. Please report back with any feedback. db.tt/3lEYm2g1
|
0

The name of the sheet with spaces followed by named range can be written as ['My Sheet$'MyData]

Here is how you get to list the tables contained in the workbook

1) Code to get the list of tables in the workbook

dim i as Integer

Set objRecordSet = objConn.OpenSchema(adSchemaTables)
Do While Not objRecordSet.EOF
    i = 1
    For i = 0 To objRecordSet.Fields.Count - 1
        Debug.Print objRecordSet.Fields(i).Name, objRecordSet.Fields(i).Value
    Next

    objRecordSet.MoveNext
Loop

EDIT: For your scenario, it will be

strQuery = "Select * from ['With Spaces$'Ingredients]"

EDIT2: I am sorry, I pasted the wrong code the first time. Please use the above code in the listing 1 and look for TABLE_NAME in the immediate window. The listing of named ranges prefixed with sheet name will be shown against TABLE_NAME (on which you can query).

Also, make sure that the named range is scoped to the worksheet. Make sure that the casing of the sheet name and range name matches with query.

11 Comments

That is what I would assume to be correct. However, it still throws the same error when I use that SQL. Same with the ' before the $. I'm starting to think this is actually a bug in the driver. If I rename the sheet to "WithSpaces" and use "Select * from ['WithSpaces$'Ingredients]" it works fine. Rename to "With Spaces" and use "Select * from ['With Spaces$'Ingredients]" it throws the error.
@user2229491: Check the modified answer and add your comments, if it didn't help. Thanks.
Using the code above (or through adox.catalog.tables) it gives the name you would expect 'With Spaces$'Ingredients. But using that in the query still throws the error. Also, I'm sure it's not an issue with scoping or mistyping, etc, because I can remove the space (in actual sheet name and in my code) and it works fine. Put it back in and it throws error.
@user2229491: Goto "Name Manager" and check if the Ingredients named range is scoped to worksheet
it is scoped to the sheet. as I mentioned, I can get the named range out of the adox.catalog object and schema, so it's certainly there.
|
0

Another late entrance to the party...

I couldn't get any of the responses here to work for the entire sheet, so I made a named range for the whole sheet (select all cells and give them a name - I called them POList) and referred to that thus:

UPDATE [POList] SET..... etc

So no single quotes, no backticks, no $ sign, not even the sheet name.

Having said that, the workbook in question only has the one sheet (which DOES have spaces in the name).

This works using Excel 2002 (!) and the following connection code

Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
With cn
    .Provider = "Microsoft.Jet.OLEDB.4.0"
    .ConnectionString = "Data Source=C:\Purchase Req No. List.xls; Extended Properties=Excel 8.0;"
    .Open
End With

Obviously this won't work for everyone's situation and is a bit of a kludgey workaround, but maybe someone will find it useful...

Comments

0

I was having this same issue and was able to solve without a named range. In addition, as a two-fold part of what my issue was, make sure there are no trailing spaces in the worksheet name. Try...

strQuery = "Select * from ['With Spaces$']"

Comments

0

If anyone is using this in query sql this work for me

select * 
FROM OPENROWSET('Microsoft.ACE.OLEDB.12.0', 
'Excel 12.0 Xml;Database=YourPath\YourFileName.xlsx;',['name name$']);

sheet name is "name name" just put name between single quote

Comments

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service and acknowledge you have read our privacy policy.

Start asking to get answers

Find the answer to your question by asking.

Ask question

Explore related questions

See similar questions with these tags.