VB Error 55 File Already open

[prometheus]

When opening a networked file on SOME computers I receive the error message (#55) that the

"file sample.xls is already open. Reopening will cause any changes to be discarded. Do youwant to reopen?"

If one selects either yes or no the file runs fine. However, I would like to eliminate this error message from occuring in the first place. Any idea as to why it only occurs on some computers? It seems to happen more ofen if the Excel file is opened from a link in another Windows program (Windows XP professional).

If I cannot eliminate the error is it possible to write some visual basic code to hide and clear just an error #55? Thanks in advance. John

 

[BrianB]

Like this .. ?

Sub test()
    On Error Resume Next
    '------------------------------------------
    '- test only .. try to divide by zero
    x = 1 / 0
    '------------------------------------------
    If Err.Number <> 55 Then
        MsgBox ("Error : " & Error(Err.Number))
        Err.Clear
        Exit Sub
    End If
End Sub