Bypassing Update Message

[MacroAlan]

My app is opening an Excel file, copying one worksheet to my new workbook and closing it. The problem is that someone in their infinite wisdom linked a file that was on their desktop and left the company.

When the file opens it asks the question about Updating. Can I bypass this question all together; or send do not update instructions.

Set XLap = CreateObject("Excel.Application")
    XLap.DisplayAlerts = False         [COLOR="#B22222"]'TRYING here to ignore the message[/COLOR]
    Set Wb1 = XLap.Workbooks.Open(FilePath & Me.cboCurrent.Text)
    Set WS1 = Wb1.Worksheets(1)
    
    XLap.Visible = True
    XLap.ScreenUpdating = True
    
    Wb1.Activate
    WS1.Activate
    With WS1
        lRow = .Range("Y65000").End(xlUp).Row

I am trying to get the users to un-link the offending file but they “don't get it.”

Thanks

 

[ranman256]

you already tried my test.