Объект CustomXMLValidationError (Office)

Представляет одну ошибку проверки в коллекции CustomXMLValidationErrors .

Замечания

Ошибки проверки могут запускаться либо при проверке операции по схеме, например при добавлении узла, либо запускаться пользователем, когда какое-либо условие не выполняется. Например, если дата начала позже даты окончания.

Пример

В следующем примере добавляется пользовательская часть, а затем в нее добавляется дочерний узел. Все возникающие ошибки добавляются в коллекцию CustomXMLValidationErrors , а затем отображаются в окне Отладка.

Dim ValErrors As CustomXMLValidationErrors 
Dim ValError As CustomXMLValidationError 
Dim cxp1 As CustomXMLPart 
Dim intError As Integer 
 
On Error Go To validation_error 
 
 With ActiveDocument 
 
    ' Add and populate a custom xml part 
    set cxp1 = .CustomXMLParts.Add "<invoice>" 
 
    ' Add a node 
    cxp1.AddNode "<quantity>", "supplier", "urn:invoice:namespace" 
 
 End With 
 
If ValErrors.Count > 0 then 
   For Each ValError In ValErrors 
      DeBug.Print("Error name: " & ValError.Name & " Error description: " & ValError.Text)  
   Next 
End If 
 
Exit Sub 
 
validation_error: 
   CustomXMLValidationErrors.Add(ValError.Name, ValError.Text)) 
Resume

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.