Not show interrupt dialog when pressing ESC

Hi,

I have a VBA code to do calculation after opening an excel workbook, user stops calculation by pressing ESC button. An interrupt dialog pops up. But user does not want to see this dialog. User hopes to see calcuation is stopped without any dialog pops up.

Is this possible?

Thanks,

Could you just put a message box before the code that runs on the on open event?

'if user says yes then update files
If MsgBox("Update Files", vbYesNo) = vbYes Then

    'your code that was originally set to run on open here

'if user selects no the open workbook normally and don't update files or run code
Else
    Exit Sub
End If

Can anybody help me?

I tried to add Application.EnableCancelKey = xlErrorHandler with On Error GoTo or Application.EnableCancelKey = xlDisabled, but both of them look have to chance to run because debug stopped at the entrance of function, and always this function. Customer creates worksheets and we put auto calculation after opening workbook. Sometimes the workbook is large and takes long time to calculate. Customer wants to stop calculation after opening workbook. They use ESC, but interrupt dialog always pops up. They do not want to see it.

Hey there,

I don't understand why the messagebox wouldn't work on the on open event. That way the user could choose to update files or not. This way if the user didn't need or want to update the files then the code would not run if they did want to then they could let the code run. You could put a warning in the msgbox stating it may take a long time to process.

Even I put a dialog before doing calculation, user can choose yes. And later the calculation may take over 30 mins, and user changes his mind, he wants to stop calculation and do another stuff. How to stop it? press ESC, but interrupt dialog pops up. User do not want to see it, he just wants the calculation stops.

I tried to add Application.EnableCancelKey = xlDisabled in every function, but the problem is debug stops at entrance of function, Application.EnableCancelKey = xlDisabled has no chance to be run.
My code is in VBA, the bug is for existing product, it is impossible to create a new dll. New dll can solve the problem?

I said the debug stops at the entrance of function, because I can enter the VBA code. For user, VBA code is encrypted, interrupt dialog shows with Continue, End, Debug, and Help buttons. For user, Debug button is diabled. For me, I can set it as enabled. When interrupt dialog pops up, I select Debug and go inside VBA code to see which function calls this interrupt dialog. And what I saw is always one function XXCELL calls it. I added Application.EnableCancelKey = xlDisabled in this function, but useless. Debug line is before Application.EnableCancelKey = xlDisabled code.

now it is impossible to put code in a dll. This is an issue, I cannot change the structure of code.

This issue at my hand is over a week.
Nobody had the similar problem?

Hey there!

Okay I think I got it!

Try adding this to your code

On Error GoTo ErrorHandler
Application.EnableCancelKey = xlErrorHandler

'your code

ErrorHandler:
If Err.Number = 18 Then
    Exit Sub
End If

end sub

Let me know if it works for you!

Sure did JosephP lol sorry wasn't paying attention

Thank you guys still on my question. But I still have not solved it