Automation Error - HELP!!!!!

[MichaelRSnow]

I have this code which was working fine last week but today is giving me the following error

Run-time error -2147217376 (80041020) Automation Error

Anybody know why or how to overcome it, the code is just importing an XML file into excel

Application.CutCopyMode = False
    Application.CutCopyMode = False
    ActiveWorkbook.XmlImport [URL="https://www.mrexcel.com/forum/=ThisWorkbook.Sheets("Links_&_Paths").Range("RefinedXML"]Url:=ThisWorkbook.Sheets("Links_&_Paths").Range("RefinedXML[/URL]")
        , ImportMap:=Nothing, Overwrite:=True, Destination:=Range("$A$1")

Please help, thank you

 

[rlv01]

My guess would be that something about the XML file you are trying to import has changed. Either the path/link has changed, the file has been renamed, or the file is gone.