MailMergeDataField.AddToRecipientFields メソッド (Publisher)

差し込み オブジェクトの親オブジェクトを特定のデータ ソースから差し込み印刷文書のマスター データ ソース (データ フィールドのコレクション) を追加します。

構文

式。AddToRecipientFields

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

注釈

このメソッドは、親 MailMergeDataField オブジェクトがまだ宛先フィールドにマップされていない場合にのみ動作します。 IsMapped プロパティを使用して、オブジェクトが既にマップされているかどうかを判断します。

例

次の Microsoft Visual Basic for Applications (VBA) マクロは、文書のマスター データ ソースを特定のデータ ソースでデータ フィールド (列) を追加するのには、(には、アドレス帳の結合)、 AddToRecipientFields メソッドを使用する方法を示しています。

このマクロを実行する前に、 datasourceindex を作業中の文書のデータ ソース コレクション内の有効なデータ ソースのインデックス番号に置き換え、 を、結合された受信者フィールドの一覧に追加するデータ ソース内のフィールドの名前に置き換えます fieldname 。

Public Sub AddToRecipientFields_Example() 
 
 Dim pubMailMergeDataSources As Publisher.MailMergeDataSources 
 Dim pubMailMergeDataField As Publisher.MailMergeDataField 
 
 Set pubMailMergeDataSources = ThisDocument.MailMerge.DataSource.DataSources 
 Set pubMailMergeDataField = pubMailMergeDataSources.Item(datasourceindex).DataFields.Item("fieldname") 
 
 If pubMailMergeDataField.IsMapped Then 
 
 Debug.Print "This field is already mapped!" 
 
 Else 
 
 pubMailMergeDataField.AddToRecipientFields 
 Debug.Print "Field added successfully. (You can verify this by looking at the recipient or product list in the UI.)" 
 
 End If 
 
End Sub

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

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