Приветствую всех!
Позаимствовал на следующий код:

Sub XSD_Validation()
    Dim xmlDoc As MSXML2.DOMDocument60
    Dim objSchemaCache As New XMLSchemaCache60
    Dim objErr As MSXML2.IXMLDOMParseError

    objSchemaCache.Add "http://www.w3.org/2001/XMLSchema", LoadXmlFile("D:\Val\MP\MP_v06.xsd")

    Set xmlDoc = LoadXmlFile("D:\Val\GKUZU_22367C5E-8E04-4806-9AED-5476E148D1B2.xml")
    Set xmlDoc.Schemas = objSchemaCache

    Set objErr = xmlDoc.Validate()
    If objErr.errorCode = 0 Then
        Debug.Print "No errors found"
    Else
        Debug.Print "Error parser: " & objErr.errorCode & "; " & objErr.reason
    End If
End Sub

Function LoadXmlFile(Path As String) As MSXML2.DOMDocument60
    Set LoadXmlFile = New MSXML2.DOMDocument60

    With LoadXmlFile
        .async = False
        .validateOnParse = False
        .resolveExternals = False
        .Load Path
    End With
End Function

В результате получаю такое сообщение:



В архиве xml-схема и xml-файл.
Понимаю, что схема ссылается на под-схемы, а как их добавить не знаю.

http://www.sql.ru/forum/1255365/validaciya-xml-sredstvami-vba