次の方法で共有

Application.MailMergeWizardStateChange イベント (Publisher)

  • [アーティクル]

差し込み印刷ウィザードで、ユーザーが指定の手順から別の指定の手順に進むときに発生します。

構文

式。MailMergeWizardStateChange (Doc, FromState)

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

パラメーター

名前 必須 / オプション データ型 説明
Doc 必須 Document 差し込み印刷のメイン文書を指定します。
FromState 必須 整数型 (Integer) ユーザーが移動する前の差し込み印刷ウィザードの手順です。

注釈

Application オブジェクト イベントにアクセスするには、コード モジュールの [全般宣言] セクションで Application オブジェクト変数を宣言し、その変数をイベントにアクセスする Application オブジェクトと等しく設定します。

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

例

次の使用例は、差し込み印刷ウィザードで、ユーザーが 3 番目の手順から 4 番目の手順に移動したときに、メッセージを表示します。 メッセージに対するユーザーの応答によって、ユーザーは 4 番目の手順に進むか、またはそのまま 3 番目の手順を続行します。

Private Sub MailMergeApp_MailMergeWizardStateChange(ByVal Doc As Document, _ 
 ByVal FromState As Long) 
 
 Select Case FromState 
 Case 1 
 MsgBox "Now you will build your publication merge " & _ 
 "by adding fields to your publication." 
 Case 2 
 MsgBox "Now you will see your publication " & _ 
 "merged with the records in the data source." 
 Case 3 
 MsgBox "Now you will complete the mail merge process." 
 End Select 
 
End Sub

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

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