Manipulering af XML fil med VBA

Jeg skal lave en macro til Word der kan skrive ned til en XML fil. Det her er hvad jeg er kommet frem til indtil videre, men det virker ikke helt, og jeg forstår ikke syntaxen i VBA :(

Private Sub ReadFile()
Dim doc As New MSXML2.DOMDocument
Dim node As XMLNode
Dim newNode As XMLNode
Dim xNode As MSXML2.IXMLDOMNode
doc.Load ("C:\Documents and Settings\z3xld\Desktop\2Usecases.XML")

With newNode
.Range.InsertXML ("<Requirement><Description /><Edited></Edited><Created>Lars the haxor</Created><Path></Path><RequirementType>Constraint</RequirementType><Priority>Low</Priority><ReqNo>Krav 007</ReqNo><Usecases><UseCase\>")

End With
Set node = doc.SelectSingleNode("/Service/Requirement")

End Sub


Som i måske kan se, har jeg prøvet at gemme en XML fil i et DOMDocument, og jeg vil gerne lave en node som skal indeholde noget XML og det vil jeg meget gerne lille på en speciel placering i det oprindelige XML dokument.

Håber i kan hjælpe mig.