How do I get rid of XLQUERY?

[barksmith]

Hi again,

Every time I open up a file I get this error message...

Cannot find XLQUERY.XLA!Register.DClick etc.

The file retrieves data to the workbook, so I'm geussing thats the problem. But I have this code which is supposed to fix it. I've put it in my workbook but it aint working. Where do I put it? and is it correct?

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 

Thanks again all.

Matt

[Leith Ross]

Hello Barksmith,

The .xla extension indicates the workbook is an add-in. You can disable it by manually by going to Tools > Add_Ins... and clearing the check box next the workbook's name.

Sincerely,
Leith Ross

[barksmith]

Hi Leith Ross,

The problem is though...once I've run the file, about 50 different people use it each day, and I can't expect them all to disable this add-in (mainly because I'll end up having to go round to every PC and do it)

If I disabled it on my PC would it be fine on others or would they have to disable it too? Is their a different fix? A colleague gave me that code and also put it into a different file, for that file it works but I can't find where he has put the code. Strange.

Cheers

[Leith Ross]

Hello barksmith,

Not sure if I still have the code for that. Give me a couple of minutes to write the macro.

Sincerely,
Leith Ross

[barksmith]

awesome, thank you!

[Leith Ross]

Hello barksmith,

Here is the macro. Change the AddIn name from "Solver.xla" to your AddIn's name.

Please Login or Register  to view this content.

Sincerely,
Leith Ross