Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

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

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

merci d'avance pour votre aide

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

Lone-wolf

XLDnaute Barbatruc
Bonsoir Nadia

Comme ceci peut-être?!

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

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…