如何解决VBScript 语法:MS Word 合并字段
我需要一个宏来放置带有嵌套 IF 语句的条件合并字段。大多数用户只是从一个文档中复制合并字段并将它们粘贴到他们的最终草稿中。但是,有许多条件合并字段可供选择。使用输入合并字段而不是复制和粘贴的命令按钮将提示用户错误并加快此过程。非常感谢任何帮助。
感谢您的阅读和关注!
Dim doc As Word.Document
Dim mName As String
Dim dField As Word.MailMergedatafield
Set doc = ActiveDocument
doc.MailMerge.Fields.Add Range:=Selection.Range,Name:="""Client_FirstName"""
Selection.TypeText Text:=" "
doc.MailMerge.Fields.AddIf Range:=Selection.Range,_
mergefield:="""Client_MiddleName""",Comparison:=wdMergeIfIsNotBlank,_
truetext:="True",_
falsetext:="False"
Selection.TypeText Text:=" "
doc.MailMerge.Fields.Add Range:=Selection.Range,_
Name:="""Client_LastName"""
doc.MailMerge.Fields.AddIf Range:=Selection.Range,_
mergefield:="""Client_NameSuffix""",_
truetext:="""Client_NameSuffix""",_
falsetext:=""
Selection.TypeText Text:=" "
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。