VBA/XML/簡単なVBAでXMLサンプル - UCSS_TIPS_AND_SAMPLES

XMLファイルを読み込む

xmlファイルを読み込むにはDOMDocumentのloadを使用します。

   Dim g_XMLDocument AS New DOMDocument50
   g_XMLDocument.async = False
   g_XMLDocument.load ("C:\test.xml")
   If g_XMLDocument.parsed = False Then
       MsgBox "ファイル形式がXMLでありません。"
   End If

XMLファイルを新規作成する

   Dim g_XMLDocument As New DOMDocument50
   Dim s As String
   s = "<?xml version=""1.0"" encoding=""UTF-8""?>"
   g_XMLDocument.loadXML s