Document.MailMergeWizardSendToCustom イベント
差し込み印刷ウィザードの手順 6 で、カスタム ボタンがクリックされたときに発生します。
名前空間: Microsoft.Office.Tools.Word
アセンブリ: Microsoft.Office.Tools.Word.v4.0.Utilities (Microsoft.Office.Tools.Word.v4.0.Utilities.dll 内)
Microsoft.Office.Tools.Word (Microsoft.Office.Tools.Word.dll 内)
構文
'宣言
Event MailMergeWizardSendToCustom As EventHandler
event EventHandler MailMergeWizardSendToCustom
解説
差し込み印刷ウィザードの手順 6 にカスタム ボタンを作成するには ShowSendToCustom プロパティを使用します。
例
カスタム宛先ボタンをクリックしたときに、差し込み印刷を実行するコード例を次に示します。この例では、カスタム宛先ボタンを使用できると仮定しています。この例は、アプリケーション レベルのアドインのために作成されています。
Private Sub DocumentMailMergeWizardSendToCustom()
Dim vstoDoc As Document = Globals.Factory.GetVstoObject(Me.Application.ActiveDocument)
AddHandler vstoDoc.MailMergeWizardSendToCustom, AddressOf ThisDocument_MailMergeWizardSendToCustom
End Sub
Private Sub ThisDocument_MailMergeWizardSendToCustom(ByVal sender As Object, ByVal e As EventArgs)
Dim vstoDoc As Document = Globals.Factory.GetVstoObject(Me.Application.ActiveDocument)
vstoDoc.MailMerge.ShowSendToCustom = "Custom Destination"
vstoDoc.MailMerge.Destination = Microsoft.Office.Interop.Word.WdMailMergeDestination. _
wdSendToNewDocument
vstoDoc.MailMerge.Execute()
End Sub
private void DocumentMailMergeWizardSendToCustom()
{
Document vstoDoc = Globals.Factory.GetVstoObject(this.Application.ActiveDocument);
vstoDoc.MailMergeWizardSendToCustom += new
EventHandler(ThisDocument_MailMergeWizardSendToCustom);
}
void ThisDocument_MailMergeWizardSendToCustom(object sender, EventArgs e)
{
Document vstoDoc = Globals.Factory.GetVstoObject(this.Application.ActiveDocument);
vstoDoc.MailMerge.ShowSendToCustom = "Custom Destination";
vstoDoc.MailMerge.Destination = Microsoft.Office.Interop
.Word.WdMailMergeDestination.wdSendToNewDocument;
vstoDoc.MailMerge.Execute(ref missing);
}
.NET Framework セキュリティ
- 直前の呼び出し元に対する完全な信頼。このメンバーは、部分的に信頼されているコードから使用することはできません。詳細については、「部分信頼コードからのライブラリの使用」を参照してください。