EXCEL VBA stops after openXML

wilson yang 1 Reputation point
2022-07-01T13:13:21.693+00:00

the program is to open and process a series of XML files in a folder.
the program will STOP RUNNING right after the openXML statement. i placed a msgbox right after just to indicate the program is running, and the msgbox does not come out. the remaining process also is not executed.

xStrPath = "D:\DATA\google drive\BOBBY 2022\RADIO LOG\log MANUAL finished\EXPORTED\EXPORTED"  
xFile = Dir(xStrPath & "\*.xml")  
  
' Switch off events triggering to disable Workbook_Open actions  
Application.EnableEvents = False  
Application.ScreenUpdating = False  
Application.DisplayAlerts = False  
  

Do While xFile <> ""  
  
	' prepare to open  
	XMLfile = xStrPath & "\" & xFile  
	  
	' open XML file  
	Application.Workbooks.OpenXML Filename:=XMLfile, LoadOption:=xlXmlLoadImportToList  
	  
	  
	' a debuging statement only  
	MsgBox ("AFTER openXML file=" & xFile)  
      
	call process_this_wb(xFile)  
	  
	' next file  
	xFile = Dir()  
      
Loop  
  
{count} votes