Importer un fichier XML

nadia_42

XLDnaute Nouveau
Bonjours tous le monde :)

voila un problème que j’espère simple mais que je ne sais pas :mad:

comment importer par macro un fichier *.XML???!!! :cool:

merci d'avance pour votre aide :D

note : pas besoin de fichier a joindre tous est claire. ;)
 

Lone-wolf

XLDnaute Barbatruc
Bonsoir Nadia :)

Comme ceci peut-être?! :rolleyes:

Sub ImportXmlFromFile()
ThisWorkbook.XmlMaps("BookInfo_Map").Import ("C:\BookData.xml")
End Sub

Et pour importer les données (Source Microsoft)

VB:
Sub ImportXMLtoList()
     Dim strTargetFile As String
     Application.DisplayAlerts = False
     strTargetFile = "C:\BookData.xml"
     Workbooks.OpenXML Filename:=strTargetFile, LoadOption:=xlXmlLoadImportToList
     Application.DisplayAlerts = True
End Sub
 

Lone-wolf

XLDnaute Barbatruc
Hé Hé Hé ! Je le savais ;)

VB:
Option Explicit
Sub Ouvrir_Fichier()
Dim fichier As String
fichier = "D:\Dossiers Excel\Formules\"

With Application.FileDialog(msoFileDialogFilePicker)
    .InitialFileName = fichier
    .Show
    If .SelectedItems.Count > 0 Then fichier = .SelectedItems(1): _
     Workbooks.Open (fichier)
End With
End Sub

Pour la suite, je ne sais pas comment faire
 
Dernière édition:

Discussions similaires

  • Résolu(e)
XL pour MAC ISBN
Réponses
37
Affichages
1 K
Réponses
2
Affichages
527

Membres actuellement en ligne

Statistiques des forums

Discussions
311 725
Messages
2 081 943
Membres
101 849
dernier inscrit
florentMIG