次の方法で共有

MailMergeFilterCriterion.Comparison プロパティ (Publisher)

  • [アーティクル]

Cell.Column プロパティと CompareTo プロパティを比較する方法を表す MsoFilterComparison 定数を取得または設定します。 値の取得と設定が可能です。

構文

式。比較

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

戻り値

MsoFilterComparison

注釈

Comparison プロパティの値には、Microsoft Office タイプ ライブラリで宣言されている MsoFilterComparison クラスの定数のいずれかを指定できます。

例

次の例では、既存のフィルターを変更して、WA と等しい [リージョン] フィールドを持たないすべてのレコードを差し込み印刷から削除します。 この使用例では、作業中の文書に差し込み印刷データ ファイルが添付されていることを前提としています。

Sub SetQueryCriterion() 
 Dim intItem As Integer 
 With ActiveDocument.MailMerge.DataSource.Filters 
 For intItem = 1 To .Count 
 With .Item(intItem) 
 If .Column = "Region" Then 
 .Comparison = msoFilterComparisonNotEqual 
 .CompareTo = "WA" 
 If .Conjunction = "Or" Then .Conjunction = "And" 
 End If 
 End With 
 Next intItem 
 End With 
End Sub

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

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