Método ValidationRules.Add (Visio)

Agrega un nuevo objeto ValidationRule vacío a la colección ValidationRules del documento.

Sintaxis

expresión. Agregar (NameU)

Expresión Variable que representa un objeto ValidationRules .

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
NameU	Obligatorio	String	Nombre universal para asignar a la nueva regla de validación.

Valor devuelto

ValidationRule

Comentarios

Si el parámetro NameU no es una cadena válida, Visio devuelve un error "Parámetro no válido".

Los valores de propiedad predeterminados de la nueva regla de validación son los siguientes:

• Category = [empty]
• Descripción = "Desconocido"
• FilterExpression = [empty]
• Ignorado = Falso
• TargetType = visRuleTargetShape
• TestExpression = [empty]

Ejemplo:

El código de ejemplo siguiente se basa en el código proporcionado por: David Parker

En el siguiente ejemplo de Visual Basic para Aplicaciones (VBA) se muestra cómo usar el método Add para agregar una nueva regla de validación denominada "UngluedConnector" a un conjunto de reglas de validación existente denominado "Análisis de árbol de errores" en el documento activo.

Public Sub Add_Example()

    Dim vsoValidationRule As Visio.ValidationRule
    Dim vsoValidationRuleSet As Visio.ValidationRuleSet
    Dim strValidationRuleSetNameU As String
    Dim strValidationRuleNameU As String
    
    strValidationRuleSetNameU = "Fault Tree Analysis"
    strValidationRuleNameU = "UngluedConnector"
    
    Set vsoValidationRuleSet = ActiveDocument.Validation.RuleSets(strValidationRuleSetNameU)
    Set vsoValidationRule = vsoValidationRuleSet.Rules.Add(strValidationRuleNameU)

End Sub

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.