Skip to main content
added 105 characters in body
Source Link
Alex
  • 1
  • 1

i created a simply xmlmap. I need a code to import xml data to excel ( right click-xml-import), to get data from an xml, or another. I want to keep the xmlmap that I created, and just replace the data in my xlxs to data from another xlm.

'Select the file
Fname = Application.GetOpenFilename(FileFilter:="xml files (*.xml), *.xml", MultiSelect:=False)

'Check if file selected
If Fname = False Then
    Exit Sub
    Else
Workbooks.Open Filename:=Fname
End If

i created a simply xmlmap. I need a code to import xml data to excel ( right click-xml-import), to get data from an xml, or another.

'Select the file
Fname = Application.GetOpenFilename(FileFilter:="xml files (*.xml), *.xml", MultiSelect:=False)

'Check if file selected
If Fname = False Then
    Exit Sub
    Else
Workbooks.Open Filename:=Fname
End If

i created a simply xmlmap. I need a code to import xml data to excel ( right click-xml-import), to get data from an xml, or another. I want to keep the xmlmap that I created, and just replace the data in my xlxs to data from another xlm.

'Select the file
Fname = Application.GetOpenFilename(FileFilter:="xml files (*.xml), *.xml", MultiSelect:=False)

'Check if file selected
If Fname = False Then
    Exit Sub
    Else
Workbooks.Open Filename:=Fname
End If
added 23 characters in body
Source Link
MWiesner
  • 9.1k
  • 12
  • 40
  • 72

i created a simply xmlmap. I need a code to import xml data to excel ( right click-xml-import), to get data from an xml, or another.

'Select the file Fname = Application.GetOpenFilename(FileFilter:="xml files (*.xml), *.xml", MultiSelect:=False)

'Check if file selected If Fname = False Then Exit Sub Else Workbooks.Open Filename:=Fname End If

THANKS !!!

'Select the file
Fname = Application.GetOpenFilename(FileFilter:="xml files (*.xml), *.xml", MultiSelect:=False)

'Check if file selected
If Fname = False Then
    Exit Sub
    Else
Workbooks.Open Filename:=Fname
End If

i created a simply xmlmap. I need a code to import xml data to excel ( right click-xml-import), to get data from an xml, or another.

'Select the file Fname = Application.GetOpenFilename(FileFilter:="xml files (*.xml), *.xml", MultiSelect:=False)

'Check if file selected If Fname = False Then Exit Sub Else Workbooks.Open Filename:=Fname End If

THANKS !!!

i created a simply xmlmap. I need a code to import xml data to excel ( right click-xml-import), to get data from an xml, or another.

'Select the file
Fname = Application.GetOpenFilename(FileFilter:="xml files (*.xml), *.xml", MultiSelect:=False)

'Check if file selected
If Fname = False Then
    Exit Sub
    Else
Workbooks.Open Filename:=Fname
End If
Source Link
Alex
  • 1
  • 1

i created a simply xmlmap. I need a code to import xml data to excel ( right click-xml-import), to get data from an xml, or another.

'Select the file Fname = Application.GetOpenFilename(FileFilter:="xml files (*.xml), *.xml", MultiSelect:=False)

'Check if file selected If Fname = False Then Exit Sub Else Workbooks.Open Filename:=Fname End If

THANKS !!!