Incrustar-vincular archivo XSD en XML al exportar

   Buenos días. Necesito ayuda sobre como incrustar o vincular un archivo XSD dentro del archivo XML al realizar la exportación de un objeto (en mi caso una consulta).
Esta tarea es sencilla si se realiza la exportación desde el entorno de access, es decir, en el objeto en cuestión dando botón derecho y exportar. De esta manera aparece un cuadro de diálogo donde en primer lugar se elije la información que se va a exportar (Datos (XML) y Esquema de los datos (XSD)), pulsando en "Más opciones" se abre otro cuadro, donde en la pestaña "Esquema" existe la opción "Incrustar esquema en documento de datos XML exportado". Al realizar esto, en vez de generarse dos archivos de exportación (el XML y el XSD), tan solo se genera un XML donde ya está contenida la información del XSD. 

En mi caso, la exportación del objeto la realizo mediante código VBA. Por tanto, me gustaría incrustar el archivo XSD en el XML desde el código. ¿Alguien sabe como hacerlo?

El código con el que realizo la exportación es el siguiente. 

Dim fd As Object
Dim varsel As Variant

    Set fd = Application.FileDialog(msoFileDialogSaveAs)

With fd
        .Title = "Exportar a archivo XML"
        .AllowMultiSelect = False
        .InitialFileName = "Prueba"

If .Show = True Then

            For Each varsel In .SelectedItems
                var1 = varsel & ".xml"
                var2 = varsel & ".xsd"

                Application.ExportXML acExportQuery, "Consulta1", var1, var2

            Next varsel

End If
End With

Un saludo y muchas gracias. 

Editado por Amex - 14/Noviembre/2019 a las 08:40