vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Erstellen von dynamischen Kontextmen?s - wann immer Sie sie brauchen!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2024
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Suche Visual-Basic Code
Tabelle in XML umwandeln 
Autor: gaschi14
Datum: 22.04.08 11:21

Hoffe, dass ich hier im richtigen Forum bin. Ich habe eine Excel Tabelle mit Makros. Bei der Excel Tabelle kann man bestimmte Zahlen auswählen, die dann automatisch in Tabelle2 geladen werden. Jetzt möchte ich die Tabelle2 in ein vorgefertigtes XML-Dokument einfügen. Dies Funktioniert auch noch ohne Probleme.
Problem: Wenn ich das XML Dokument öffne, stehen die Zahlen doppelt drin. Zum Beispiel steht in der Excel-Tabelle2 die Zahl 1,23. Dann steht im XML Dokument 1,231,23. Ich glaube da läuft einfach ne Schleife zu oft durch oder so. Finde den Fehler aber nicht. Muss leider den Code aufteilen, weil er zu lange ist, sonnst kann ich den Beitrag nicht öffnen. Der Rest des Codes wird als Antwort zu diesem Thema geschrieben. Hier der Code:
    Dim xml As New MSXML2.DOMDocument40
 
    Dim xmlProcInstr As MSXML2.IXMLDOMProcessingInstruction
    Dim xmlComment As MSXML2.IXMLDOMComment
    Dim xmlElement As MSXML2.IXMLDOMElement
 
    Dim xmlTableElement As MSXML2.IXMLDOMNode
    Dim xmlWaveAnchorElement As MSXML2.IXMLDOMNode
    Dim xmlTitleElement As MSXML2.IXMLDOMNode
    Dim xmlForcedReturnElement As MSXML2.IXMLDOMNode
    Dim xmlS_TableElement As MSXML2.IXMLDOMNode
    Dim xml_PhysicalSymbolElement As MSXML2.IXMLDOMNode
    Dim xmlS_HeadElement As MSXML2.IXMLDOMNode
    Dim xmlS_HRowElement As MSXML2.IXMLDOMNode
    Dim xmlS_HCellElement As MSXML2.IXMLDOMNode
    Dim xmlS_HCellBodyElement As MSXML2.IXMLDOMNode
 
    Dim xmlS_BodyElement As MSXML2.IXMLDOMNode
    Dim xmlS_RowElement As MSXML2.IXMLDOMNode
    Dim xmlS_CellElement As MSXML2.IXMLDOMNode
    Dim xmlS_CellBodyElement As MSXML2.IXMLDOMNode
    Dim xmlFootnoteElement As MSXML2.IXMLDOMNode
 
    Dim xmlFootnote As MSXML2.IXMLDOMNode
    Dim xmlCrossRef As MSXML2.IXMLDOMNode
    Dim xmlSubscript As MSXML2.IXMLDOMNode
    Dim xmlPhysicalValue As MSXML2.IXMLDOMNode
    Dim xmlSymb_CharElement As MSXML2.IXMLDOMNode
 
    Dim xmlAttribute As MSXML2.IXMLDOMAttribute
    Dim xmlCData As MSXML2.IXMLDOMCDATASection
    Dim xmlText As MSXML2.IXMLDOMText
    Dim xmlTextCrLf As MSXML2.IXMLDOMText
    Dim xmlDocFrag As MSXML2.IXMLDOMDocumentFragment
 
    Dim blFootnote1 As Boolean
    Dim blFootnote2 As Boolean
    Dim blFootnote3 As Boolean
    Dim blFootnote4 As Boolean
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Tabelle in XML umwandeln3.073gaschi1422.04.08 11:21
Re: Tabelle in XML umwandeln1.494gaschi1422.04.08 11:21
Re: Tabelle in XML umwandeln1.328gaschi1422.04.08 11:23
Re: Tabelle in XML umwandeln1.296gaschi1422.04.08 11:24
Re: Tabelle in XML umwandeln1.283gaschi1422.04.08 11:25
Re: Tabelle in XML umwandeln1.240gaschi1422.04.08 11:26
Re: Tabelle in XML umwandeln1.250gaschi1422.04.08 11:27
Re: Tabelle in XML umwandeln1.221gaschi1422.04.08 11:27
Re: Tabelle in XML umwandeln1.303gaschi1422.04.08 11:27
Re: Tabelle in XML umwandeln1.310gaschi1422.04.08 11:28
Re: Tabelle in XML umwandeln1.257gaschi1422.04.08 11:28
Re: Tabelle in XML umwandeln1.308gaschi1422.04.08 11:29
Re: Tabelle in XML umwandeln1.275gaschi1422.04.08 11:29
Re: Tabelle in XML umwandeln1.268gaschi1422.04.08 11:30
Re: Tabelle in XML umwandeln1.286gaschi1422.04.08 11:30

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2024 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel