problemas con xml y vb6

[chei]

hola expertos

desde hace un par de dias que estoy intentando crear un xml en vb6 desde unos datos introducidos en excel

el problema que tengo es a la hora de generar el xml con MSXML2.DOMDocument que me lo generara en ANSI cuando yo quiero generarlo en UTF-8

sabeis algun modo para poder hacerlo???

al principio intente hacerlo con "Open XMLFileName For Output As #1" y escribir ahi todo el codigo xml que quiero pero esto me genera un xml en ANSI

ahora estoy intentando hacerlo con "MSXML2.DOMDocument" y veo que tambien me lo genera en ANSI

Option Explicit
Dim DOMDoc As MSXML2.DOMDocument

Sub importar()
Dim xmlDoc As MSXML2.DOMDocument
Dim raiz As MSXML2.IXMLDOMElement
Dim fechas As MSXML2.IXMLDOMElement

Set xmlDoc = New MSXML2.DOMDocument
xmlDoc.appendChild xmlDoc.createElement("raiz")

Set raiz = xmlDoc.selectSingleNode("//raiz")

raiz.appendChild xmlDoc.createElement("Fechas")

Set fechas = xmlDoc.selectSingleNode("//Fechas")

fechas.appendChild xmlDoc.createElement("fecha")
xmlDoc.selectSingleNode("//fecha").Text = "TEXTO1"

fechas.appendChild xmlDoc.createElement("fecha")
xmlDoc.selectSingleNode("//fecha").Text = "TEXTO2"

fechas.appendChild xmlDoc.createElement("fecha")
xmlDoc.selectSingleNode("//fecha").Text = "TEXTO3"


xmlDoc.Save "c:\prueba.xml"
End Sub

Agradezco cualquier ayuda