例程停止没有错误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 

基本上它只是打开我select的文件，并在当前的书中处理这些信息，问题是，它突然停止在'Workbooks.Open Filename：= RutaArchivo'没有错误或任何消息，它确实打开文件和代码只是停止运行。

当我在那里插入一个断点，然后去换行时，它工作正常，但没有断点，只是打开书本并停止运行，不知道为什么会发生这种情况

UPDATE

所以我发现，如果我用直接在vba（F5）中运行的“ctrl + shift + S”或者使用没有shift的shorcut运行脚本，例如“ctrl + S”解决了问题， ？