ValidationRules.Add メソッド (Visio)

ドキュメントの ValidationRules コレクションに、新しい空の ValidationRule オブジェクトを追加します。

構文

式。Add (NameU)

式ValidationRules オブジェクトを表す変数。

パラメーター

名前	必須 / オプション	データ型	説明
NameU	必須	String	新しい検証ルールに割り当てる汎用名。

戻り値

ValidationRule

注釈

NameU パラメーターが有効な文字列でない場合は、"無効なパラメーターです" というエラーが返されます。

新しい検証規則の既定のプロパティ値は次のとおりです。

• Category = [empty]
• Description = "Unknown"
• FilterExpression = [empty]
• 無視 = False
• Targettype = visRuleTargetShape
• TestExpression = [empty]

例

次のサンプル コードは、David Parker によって提供されるコードに基づいています。

次のVisual Basic for Applications (VBA) の例は、Add メソッドを使用して、"UngluedConnector" という名前の新しい検証規則を、作業中のドキュメントの "Fault Tree Analysis" という名前の既存の検証規則セットに追加する方法を示しています。

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

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。