I'm using the following code to detect if a referenced DLL is missing following an installation of the DLL.

This is used in a spreadsheet that is distributed to others and some (not many) are getting Error Number 1004.

I can't find anything in common with the computers that get this error. They are running at least Windows XP SP2 and at least Excel XP.

Anyone got a clue?
Dim x, y, z, Error1, Error2

On Error Resume Next
x = ThisWorkbook.VBProject.References.Item(ThisWorkbook.VBProject.References.Count - 0).Name
y = ThisWorkbook.VBProject.References.Item(ThisWorkbook.VBProject.References.Count - 1).Name
z = ThisWorkbook.VBProject.References.Item(ThisWorkbook.VBProject.References.Count - 2).Name
If Err.Number <> 0 Then
Error1 = True
Err.Clear
Else
Error1 = False
End If
Thanks,
Ernie