VBAなんでも質問スレ Part2 [転載禁止]©2ch.net

**デフォルトの名無しさん** · 2016/03/18(金) 21:10:32.76

>>154
＞ 'ノードとして子ども・孫の要素を追加
＞Set elem2 = rootelem.appendChild(myxml.createElement("CHARACTER"))
＞ Set elem2 = rootelem.appendChild(myxml.createElement("PERSON"))
＞
＞ 'ノードとしてひ孫の要素を追加
＞Set node = rootelem.appendChild(myxml.createNode("element", "NAME", ""))
＞ node.Text = "パパス"

rootelemにしか子供追加してないから、孫、ひ孫が生成されないのは当然な気がする
追加した子要素に子供を追加してやらなくちゃ…
試してないけどこんな感じ？

'ノードとして子ども・孫の要素を追加
Set elem2 = rootelem.appendChild(myxml.createElement("CHARACTER"))
Set elem2 = elem2.appendChild(myxml.createElement("PERSON"))

'ノードとしてひ孫の要素を追加
Set node = elem2.appendChild(myxml.createNode("element", "NAME", ""))
node.Text = "パパス"