В VB IDE перейдите в Инструменты, Опция, вкладка Общие, Кадр перехвата ошибок. Я предполагаю, что вы установили «Break on All Errors», тогда как вы, вероятно, хотите «Break on Unhandled Errors».
Ваше утверждение Err.Raise
дает мне ошибку компиляции; попробуйте снять брекеты.
Также вы можете использовать
Err.Raise vbObjectError + 12345, Description:="Error message"
т.е. смещение вашего кода ошибки из константы VB vbObjectError, чтобы убедиться, что вы не столкнетесь.