XMLを読み込み、特定の子ノードに要素を挿入して別名のXMLファイルとして出力したい

Question

###前提・実現したいこと
現在、VBAを使って以下の内容を実装しようとしております。
①Excelファイルと同じ階層にある特定のXMLファイルを読み込みます。
②XMLファイルの特定の子ノードに要素を追加していきます。
③情報追加が終わったら、XMLDocumentを別名で保存します。

上記は実装できたのですが、問題は①のセクションで、同じ階層にあるXMLファイルを読み込んでいるのですが、他部署の方に配布する際に、元となるXMLファイルを添付するのを失念したりするケースがあるため、できればこれ（XMLファイルの読み込み）を省略したいと考えています。
VBAで新規にXMLファイルを作成するつもりで書けば良いのかもしれませんが、これでは手間がかかるため、できれば現在BaseとしているXMLの構造と、入力済のデータはそのまま使用したいと考えています。
XMLファイルをエクセルファイルに埋め込む等（できるのか分かりませんが）、なにか良案がございましたら、教えていただければ幸いです。

###問題のソースコード箇所

    Set XMLDocument = New MSXML2.DOMDocument60
    FileName = ws.Range("FileName") + ".xml"

↑上記のxmlファイルの読み込みを別の方法で対処したいと考えています。
###補足情報(言語/FW/ツール等のバージョンなど)
VBA

Answer 1

MSXML2のXML読み込みはファイル経由でしかできなそうです。
よって、

・FileSystemObjectを使用してXMLをファイル出力（この時は単純にXMLをテキストとして記載すればいいでしょう）（保存先はGetSpecialFolder()メソッドを使ってtempフォルダは以下にすればよいと思います）
・保存したXMLをロード
・tempフォルダに保存したXMLを削除する

この流れだとご希望の機能は実現できそうです。

Comments

[cesolution]

ご回答ありがとうございます。
ご連絡いただいた方法で完璧に動作いたしました。
非常に助かりました