Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
552to556
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
552to556
552to556
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Excel Dateien auslesen und xml Datei schreiben

Excel Dateien auslesen und xml Datei schreiben
25.01.2005 11:36:18
Fisi
Hi
kann mir jemand bei diesem Thema weiterhelfen?
Muss die Daten einer Execl Tabelle auslesen und in ein
XML File schreiben. Wäre für jede Hilfe dankbar.
Gruß fisi

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
XML-File anlegen
25.01.2005 12:33:48
Tom
hi fisi,
also ganz kurz: zu aller erst Verweis auf Microsoft XML setzen.
und ansonsten hier ein kleines Beispiel, der Objektkatalog ist ganz hilfreich:


Sub CreateNewXML()
    'Anlegen XMLFile
     Dim oXMLFile As New DOMDocument
     'Anlegen der Wurzel
     Dim oRoot As IXMLDOMNode
     Set oRoot = oXMLFile.createNode("element", "WURZEL", "")
     oXMLFile.appendChild oRoot
     'Erstes Element
     Dim oChild As IXMLDOMElement
     Set oChild = oXMLFile.createNode("element", "EINTRAG", "")
     oChild.Text = "hier kommt dann der Inhalt rein, oder so "
     oRoot.appendChild oChild
     ' Attribut hinzufügen
     Dim oAttr As IXMLDOMAttribute
     Set oAttr = oXMLFile.createAttribute("ID")
     oAttr.Value = 15
     oChild.setAttributeNode oAttr
     'Speichern
     oXMLFile.Save "h:\test.xml"
End Sub


die test.xml sieht dann folgendermaßen aus:

<WURZEL><EINTRAG ID="15">hier kommt dann der Inhalt rein, oder so </EINTRAG></WURZEL>

hoffe das hilft ein wenig
Gruß,
Tom
Anzeige
AW: XML-File anlegen
25.01.2005 13:28:15
fisi
Vielen dank Tom werd das gleich mal testen :-)

172 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige