"runtime error 287" on speak cells when esc. key is pressed

when the user presses the escape key in the keyboard (while the speak cell in a range of cell is on going) there is an error message appears "runtime error 287" Application defined or object defined - error. how can i solve this?

by the way this is the code i write on Module 1

Please Login or Register  to view this content.

and this is the code on the sheet where i need to execute the code:

Please Login or Register  to view this content.

(i got this code from a youtube tutorial but i need to write a code for error handling so that the dialog box with the message runtime error will not appear and the debug mode will not be opened)

much appreciated your help. thank you