XLQUERY.XLA!Register.DClick Problrm

**Moe** · 01-11-2005, 01:52 PM

Everytime I open a file that has a database query set up, I get this message:

Cannot find XLQUERY.XLA!Register.DClick, which has been assigned to run each time <filename> is opened. Continuing could cause errors. Cancel opening <filename>?
Yes or No

This just started happening a few weeks ago, does anybody know about this problem?

Thanks,
Moe

**Moe** · 01-27-2005, 08:48 PM

I'm sure I'm not the only one with this problem. Anyone??

**Moe** · 04-19-2005, 12:43 AM

Anybody? I'm still having this problem several months later.......

Thanks

**alinca5512** · 10-26-2005, 12:35 PM

I am having the same error...I have found a site that explains the error and gives suggestions, but at this point I have not been able to decifer what I need to do exactly. Maybe you will have better luck.

http://support.microsoft.com/default...b;en-us;277620

**cmcfalls** · 01-05-2006, 10:12 AM

Did nobody ever figure out how to fix this? I have had this problem for months too.

**ced70** · 01-06-2006, 12:47 PM

I am having the same problem. I havent found a solution yet. I can tell you this though if you are running Excel 2002 or 2003 it does not include the Xlquery.xla file and according to their website is no longer available for download. You need the file to put in the following directory.
C:\Program Files\Microsoft Office\Office\Library\MSQuery

But if you cant download the file anywhere than how do you fix it? This is stupid.

**Gitesh Shah** · 11-12-2008, 03:39 AM

open vba (alt+f11)
dbclick vbproject(<yourfilename>)
dbclick microsoft excel object
dbclick this workbook
pest following code

Please Login or Register  to view this content.

run thiscode
delete thiscode
close vba
save the file

Gitesh

**VBA Noob** · 11-12-2008, 03:48 AM

Gitesh Shah,

Welcome to the forum.

Please take a few minutes to read the forum rules below before posting again. I've added the code tags for you this time.

Also we prefer you don't dig up old threads as the OP would already have found a solution

VBA Noob

**Lennart L.** · 09-07-2012, 01:24 AM

I got the problem solved with this VBA module:
Sub DeleteQueryDefinedNames()
Dim n As Name
For Each n In ActiveWorkbook.Names
If n.Visible = False And InStr(1, n.Name, "QUERY", _
vbTextCompare) > 0 And InStr(1, n.Name, _
"Query_from", vbTextCompare) = 0 Then
n.Delete
End If
Next
End Sub

:-) Lennart L.

**protonLeah** · 09-07-2012, 01:58 AM

Welcome to the forum.

Please take a few minutes to read the forum rules below before posting again....

Also we prefer you don't dig up old threads as the OP would already have found a solution ( see #8 above)
-------------------------
Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code. Posting code without them makes your code hard to read and difficult to be copied for testing. Highlight your code and click the # at the top of your post window. For more information about these and other tags, found here