VBを使用して、XMLの内容を変更するには？ (ID:77484)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 魔界の仮面弁士さんありがとうございます。 誤ったソースを記述してしまい大変申し訳ございませんでした。 実際のソースは、 Public Sub Gethonbundata() Dim xDoc As MSXML.DOMDocument Set xDoc = New MSXML.DOMDocument xDoc.validateOnParse = False If xDoc.Load("・・・test.xml") Then '関数呼出 InchonbunData xDoc.childNodes, 0 Else End If End Sub Public Sub InchonbunData(ByRef Nodes As MSXML.IXMLDOMNodeList, _ ByVal Indent As Integer) Dim xNode As MSXML.IXMLDOMNode Dim textdata As String Indent = Indent + 2 For Each xNode In Nodes If xNode.nodeType = NODE_ELEMENT Then If xNode.nodeName = "test" Then 'ここで変更したいのですが、うまくいきません。 Nodes.Item(0).firstChild.nodeValue = "変更文字列" End If End If If xNode.hasChildNodes Then InchonbunData xNode.childNodes, Indent End If Next xNode End Sub です。これを実行し、XMLファイルを開いてみると、「文字列」のままと なってしまいます。 大変申し訳ございませんが、ご教授お願い致します。