Want to add multiple xml file in excel. Is there a way to import all xml files in individual cell as A1, A2, A3...
ActiveWorkbook.XmlImport URL:= _
"C:UserslaxmanbDesktopBrijxml1_SMF35980413.xml", ImportMap:=Nothing, _
Overwrite:=True, Destination:=Range("$A$1")
Range("A2").Select
ActiveWorkbook.XmlMaps("IMAGE_Map").Import URL:= _
"C:UserslaxmanbDesktopBrijxml1_SMF35985134.xml"
Workbooks("Book15").Connections.AddFromFile _
"C:UserslaxmanbDocumentsMy Data SourcesNew folder35985134.xml"
ActiveWorkbook.XmlImport URL:= _
"C:UserslaxmanbDocumentsMy Data SourcesNew folder35985134.xml", _
ImportMap:=Nothing, Overwrite:=True, Destination:=Range("$A$2")
Range("A3").Select
ActiveWorkbook.XmlMaps("IMAGE_Map").Import URL:= _
"C:UserslaxmanbDesktopBrijxml1_SMF35985271.xml"
ActiveWorkbook.XmlImport URL:= _
"C:UserslaxmanbDocumentsMy Data SourcesNew folder35985271.xml", _
ImportMap:=Nothing, Overwrite:=True, Destination:=Range("$A$3")
End Sub
ActiveWorkbook.XmlImport URL:= _
"C:UserslaxmanbDesktopBrijxml1_SMF35980413.xml", ImportMap:=Nothing, _
Overwrite:=True, Destination:=Range("$A$1")
Range("A2").Select
ActiveWorkbook.XmlMaps("IMAGE_Map").Import URL:= _
"C:UserslaxmanbDesktopBrijxml1_SMF35985134.xml"
Workbooks("Book15").Connections.AddFromFile _
"C:UserslaxmanbDocumentsMy Data SourcesNew folder35985134.xml"
ActiveWorkbook.XmlImport URL:= _
"C:UserslaxmanbDocumentsMy Data SourcesNew folder35985134.xml", _
ImportMap:=Nothing, Overwrite:=True, Destination:=Range("$A$2")
Range("A3").Select
ActiveWorkbook.XmlMaps("IMAGE_Map").Import URL:= _
"C:UserslaxmanbDesktopBrijxml1_SMF35985271.xml"
ActiveWorkbook.XmlImport URL:= _
"C:UserslaxmanbDocumentsMy Data SourcesNew folder35985271.xml", _
ImportMap:=Nothing, Overwrite:=True, Destination:=Range("$A$3")
End Sub