XML-VBA Access 2010 importieren

Ich integrieren will in meinem VBA-code eine Anweisung zum importieren von XML-Dateien.
In der else Zweig von meinem Zustand ich will fügen Sie einen Befehl zum importieren der XML-Dateien. Könnten Sie mir empfehlen, etwas (eine VBA-Anweisung, welche die import) ?

   Private Sub Commande0_Click()
      Dim rep As String
      rep = Dir("C:\Users\Toufik\Desktop\XML\*.*", vbDirectory)
      Do While (rep <> "")
         If (GetAttr("C:\Users\Toufik\Desktop\XML\" & rep) And vbDirectory) = vbDirectory Then
            MsgBox "Directory " & rep
         Else
            MsgBox "File " & rep
         End If 
         rep = Dir
      Loop
   End Sub
InformationsquelleAutor Moad Toutou | 2013-05-13
  1. 3

    Wenn Sie die zu importierenden XML-Daten in Access-VBA verwenden Sie sollten überprüfen, die Application.ImportXML Methode, die hier beschrieben:

    http://msdn.microsoft.com/en-us/library/ff823157%28v=office.14%29.aspx

    InformationsquelleAutor Gord Thompson
Schreibe einen Kommentar