Cannot find XLQUERY.XLA meessage upon file open

[u742884]

I am getting the following message when I open my file:

Cannot find XLQUERY.XLA!Register.DClick,which has been assigned to run each time [filename]worksheet name is opened. Continuing could cause errors. Cancel opening [filename]worksheet?

Note: "[filename]worksheet name" show the actual filename and worksheet name.

While I do have a macro set to run on file open, it does not execute any queries. Any ideas?

 

[Oaktree]

See:

http://support.microsoft.com/kb/277620

 

[ackey]

Hi,

I have the same problem as below, and as Oaktree inferred throuh his link, I ran the following suggested code:

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

This has always worked for me in the past, as this problem does crop up now and again, however in the latest example it does not work. When saving the file after running the code I get the message:

'C:\Program Files\Microsoft Office\OFFICE11\LIBRARY|MSQuery|XLquery.xla' could not be found.

Would the above code not remove the need to link to this file? All sheets are unprotected and unhidden

Thanks in advance