Рутинная остановка без ошибок Excel VBA

У меня действительно жуткая ошибка с excel vba сводит меня с ума: у меня есть следующий код:

Option Explicit Dim nomLibroFuente, nomLibro As String Dim nomTab1, nomTab2, nomTab3, nomTab4 As String Dim n, m, x, y, z As Integer Dim totalTab1, totalTab2, totalTab3, totalTab4 As Integer Dim RutaArchivo As Variant Sub llenarLibro() nomTab1 = "POSICION VEHICULO" nomTab2 = "TIPO DE DAÑO" nomTab3 = "GRAVEDAD DAÑO" nomTab4 = "DAÑOS" nomLibro = ActiveWorkbook.Name On Error GoTo errorEjecucion optimizarOn RutaArchivo = Application.GetOpenFilename(Title:="Archivo de Origen", _ filefilter:="Excel files (*.xls), *.xls") If RutaArchivo = False Then salirRutina End If Workbooks.Open Filename:=RutaArchivo nomLibroFuente = ActiveWorkbook.Name ... some other stuff end sub 

В основном это просто открывает файл по моему выбору и обрабатывает эту информацию в текущей книге, проблема в том, что она внезапно останавливается в «Workbooks.Open Filename: = RutaArchivo» без ошибок или какого-либо сообщения, она открывает файл и код просто перестает работать.

Когда я вставляю точку останова и иду линию для линии, она работает нормально, но без точки останова она просто открывает книгу и перестает работать, не знаю, почему это происходит

ОБНОВИТЬ

Поэтому я выяснил, что проблема возникает, если я запускаю скрипт с shorcut, например, ctrl + shift + S, запущенным непосредственно внутри vba (F5) или используя shorcut без сдвига, например, «ctrl + S» решает проблему, теперь почему ?

Давайте будем гением компьютера.