Extracting key information from a directory of XML files
A few short comments:
Use Option Explicit:
Why? because It makes thinks easier by orders of magnitude when developing.
You get more useful error messages and it becomes harder to misspell variable names without realizing.
That brings us right to the next:
Variable Names:
Your variable names are not consistently cased. You are mixing up &quot;camel casing&quot; (e.g. myDir) and &quot;Pascal Casing&quot; (e.g. StrFile)
Also temp 1 through 4 are not really good variable names. Neither is x, but hey ;)
Error Handling:
You should really make sure your &quot;Application&quot; is in a clean state after exit, even when you got unexpected errors:
Sub ImportXMLToList()
    On Error GoTo ErrorHandler

    ' Code goes here: 

:CleanExit
    Application.DisplayAlerts = True
    Application.ScreenUpdating = True
    Application.StatusBar = False
    Application.DisplayStatusBar = oldStatusBar

    Exit Sub
:ErrorHandler
    'Close resources, maybe errormessage
    Resume CleanExit
End Sub