在文档中显示“邮件合并向导”。
expression.ShowWizard(InitialState, ShowDocumentStep, ShowTemplateStep, ShowDataStep, ShowWriteStep, ShowPreviewStep, ShowMergeStep)
expression 必需。该表达式返回一个 MailMerge 对象。
InitialState Variant 类型,必需。要显示的“邮件合并向导”步骤的数目。
ShowDocumentStep Variant 类型,可选。如果为 True,则在邮件合并步骤顺序中保留“选择文档类型”步骤;如果为 False,则删除步骤 1。
ShowTemplateStep Variant 类型,可选。如果为 True,则在邮件合并步骤顺序中保留“选择开始文档”步骤;如果为 False,则删除步骤 2。
ShowDataStep Variant 类型,可选。如果为 True,则在邮件合并步骤顺序中保留“选择收件人”步骤;如果为 False,则删除步骤 3。
ShowWriteStep Variant 类型,可选。如果为 True,则在邮件合并步骤顺序中保留“书写信函”步骤;如果为 False,则删除步骤 4。
ShowPreviewStep Variant 类型,可选。如果为 True,则在邮件合并步骤顺序中保留“预览信函”步骤;如果为 False,则删除步骤 5。
ShowMergeStep Variant 类型,可选。如果为 True,则在邮件合并步骤顺序中保留“完成合并”步骤;如果为 False,则删除步骤 6。
本示例检查是否应经显示“邮件合并向导”,如果是,则移至“邮件合并向导”的第六步骤并从“邮件合并向导”中删除第五步骤。
Sub ShowMergeWizard()
With ActiveDocument.MailMerge
If .WizardState > 0 Then
.ShowWizard InitialState:=6, ShowPreviewStep:=False
End If
End With
End Sub