Visual Basic para Aplicaciones - Convertir XLS a XML

Hola, gracias por leerme antes de nada y mi pregunta es la siguiente:
Quisiera saber si es posible mediante VBA para Excel convertir un libro con 3 hojas en un fichero con formato XML.

Ese libro excel esta constantemente abierto porque esta vinculado a una aplicación que le esta pasando valores. Mi necesidad es que con el libro abierto programar el que vaya generando el fichero XML de el mismo.

Gracias.

Prueba con Archivo -> Guardar como -> .xml

Sub GuardarComo()
'

ActiveWorkbook.SaveAs Filename:= _
"C:\Path\Mis documentos\Libro1.xml", FileFormat:= _
xlXMLSpreadsheet, ReadOnlyRecommended:=False, CreateBackup:=False
End Sub

NO guarda el proyecto VBA, solamente la hoja activa de Excel
Suerte