Application.MailMergeGenerateBarcode イベント (Publisher)

差し込み印刷文書でバーコードを生成するためにデータが必要になったとき、特に差し込み印刷の宛先リストが変更されたときに発生します。

構文

式。MailMergeGenerateBarcode (Doc, bstrString)

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

パラメーター

注釈

差し込み印刷のアドレスを検証するサード パーティ製アドインは、ユーザーの操作がそのバーコードを生成する要求をリッスンするように MailMergeGenerateBarcode イベントを使用できます。 このような状況で、追加で MailMergeGenerateBarcode イベントが発生した、作業中の文書がデータ ソースに接続されている場合は、アドインのプロパティを使用、 MailMergeDataSource.ActiveRecord バーコードを生成する対象のレコードを決定するのには通知を受信するとします。 作業中の文書がデータ ソースに接続されていない場合、アドインを使用してアドレス テキスト直接。

アドインがアドレス テキストを直接使用できる場合は、 bstrString 出力パラメーターのバーコードの文字列表現が返されます。 住所の文字列を直接使用できない場合は、空の文字列が返されます。

MailMergeGenerateBarcode イベントのトリガーを許可するには、コードで MailMergeInsertBarcode イベントを処理する必要があります。アドインはそのイベントに渡される OkToInsert パラメーターを True に設定する必要があります。

Application オブジェクトでイベントを使用する方法の詳細については、「 Application オブジェクト でのイベントの使用」を参照してください。

例

次の Microsoft Visual Basic for Applications (VBA) マクロは、 MailMergeGenerateBarcode イベントを処理する方法を示しています。 アクティブなレコードのバーコードを表す文字列が返されます。 変数 indexNumberOfBarcodeColumn は、バーコードの一覧を表示する、データ ソース内の列のインデックス番号を表します。 このコードは、アクティブな文書がデータ ソースに接続されていることを前提としています。

Private Sub pubApplication_MailMergeGenerateBarcode(ByVal Doc As Document, bstrString As String) 
 bstrString = pubApplication.ActiveDocument.MailMerge.DataSource.DataFields.Item(indexNumberOfBarcodeColumn).Value 
End Sub

For this event to occur, you must place the following line of code in the General Declarations section of your module.

Public WithEvents pubApplication As Application

その後、次の初期化手順を実行する必要があります。

Public Sub Initialize_pubApplication() 
 Set pubApplication = Publisher.Application 
End Sub

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

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