MailMergeDataSource.InvalidComments プロパティ (Publisher)
InvalidAddress プロパティが True の場合は、このプロパティを取得または差し込み印刷のレコードに無効なデータを説明する 文字列 を設定します。 値の取得と設定が可能です。
構文
式。InvalidComments
式MailMergeDataSource オブジェクトを表す変数。
戻り値
文字列
注釈
SetAllErrorFlags メソッドを使用して、データ ソース内のすべてのレコードの InvalidAddress プロパティと InvalidComments プロパティの両方を設定します。
例
次の使用例は、レコードを検索して、各レコードの PostalCode フィールドの長さが 5 桁以上あることを確認します。 PostalCode フィールドの長さが 5 桁未満の場合、そのレコードは差し込み印刷から除外され、無効のフラグが設定されます。
Sub ExcludeRecords()
Dim intRecord As Integer
With ActiveDocument.MailMerge
For intRecord = 1 To .DataSource.RecordCount
.DataSource.ActiveRecord = intRecord
If Len(.DataSource.DataFields("PostalCode").Value) < 5 Then
With .DataSource
.Included = False
.InvalidAddress = True
.InvalidComments = "This record is removed " & _
"from the mail merge because its postal code" & _
"has less than five digits."
End With
End If
Next
End With
End Sub
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。