MailMergeFilterCriterion オブジェクト (Publisher)

接続されている差し込み印刷またはカタログ データの差し込みデータ ソースに適用するフィルターを表します。 MailMergeFilterCriterion オブジェクトは、MailMergeFilters オブジェクトのメンバーです。

注釈

各フィルターはクエリ文字列内の行を示します。 データ ソースクエリ条件を取得または設定するには、Column、Compare、CompareTo、および Conjunction の各プロパティを使用します。

追加 の使用 MailMergeFilters オブジェクトは、新しいフィルター条件をクエリに追加する方法です。

例

次の例では、既存のフィルターを変更して、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 
 End With 
End Sub

この例では、クエリ文字列に新しい行を追加し、データ ソースに結合されたフィルターを適用します。 次の使用例では、作業中の文書にデータ ソースが接続されていることを前提としています。

Sub FilterDataSource() 
 With ActiveDocument.MailMerge.DataSource 
 .Filters.Add Column:="Region", _ 
 Comparison:=msoFilterComparisonIsBlank, _ 
 Conjunction:=msoFilterConjunctionAnd 
 .ApplyFilter 
 End With 
End Sub

プロパティ

• Application
• 列
• CompareTo
• 比較
• 併用
• Creator
• インデックス
• Parent

関連項目

• Publisher オブジェクト モデル リファレンス

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

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