I get this error and have no idea how to solve it. I have been reading several treads on this forum abut this error but i cannot solve it.
This is the start of my program:
Dim Temp As Variant
Dim AantalRec As Integer
Dim oRoot As IXMLDOMElement
Dim oElemVN As IXMLDOMElement
Dim oElemBericht As IXMLDOMElement
Dim oElemAdministratieveEenheid As IXMLDOMElement
Dim oElemTijdvakAangifte As IXMLDOMElement
Dim oElemTijdvakCorrectie As IXMLDOMElement
Dim oElemVolledigeAangifte As IXMLDOMElement
Dim oElemCollectieveAangifte As IXMLDOMElement
Dim oElemSaldoCorrectiesVoorgaandTijdvak As IXMLDOMElement
Dim oElemInkomstenverhoudingInitieel As IXMLDOMElement
Dim oElemNatuurlijkPersoon As IXMLDOMElement
Dim oElemAdresBinnenland As IXMLDOMElement
Dim oElemAdresBuitenland As IXMLDOMElement
Dim oElemInkomstenPeriode As IXMLDOMElement
Dim oElemSectorRisocogroep As IXMLDOMElement
Dim oElemNominatieveAangifte As IXMLDOMElement
Dim OElemWgf As IXMLDOMElement
Dim oElemData As IXMLDOMElement
Dim oElemDataChild As IXMLDOMElement
Dim oDocType As IXMLDOMDocumentType
Dim intIDX As Integer
Dim strXMLInstruct As String
Dim oAttribute As IXMLDOMAttribute
Dim oRootElem As IXMLDOMElement
Dim oRootLoonAangifte As IXMLDOMElement
' Dim Opi As IXMLDOMProcessingInstruction
Dim Tempbedrag As Single
Dim Bedrag As Long
Dim Bedrag1 As Single

When running the program, the first part is doing good.
But on this line:

oElemTijdvakCorrectie.appendChild oElemInkomstenverhoudingInitieel

i get the error.
Who can help me?
Regards,
Herman