Word VBA教程:AddSet方法

向邮件合并主文档添加一个 SET 域。返回一个 MailMergeField对象。SET 域定义指定书签的文字。

expression.AddSet(Range, Name, ValueText, ValueAutoText)

expression   必需。该表达式返回一个 MailMergeFields对象。

Range   Range对象,必需。指 SET 域的位置。

Name   String 类型,必需。将 ValueText 指派至的书签名称。

ValueText   Variant 类型,可选。由 Name参数指定的与书签名称相关的文字。

ValueAutoText   Variant 类型,可选。指与由 Name参数指定的书签名称相关的文字的“自动图文集”词条。如果指定该参数,则忽略 ValueText。

VBA示例

本示例在活动文档的开头添加一个 SET 域,然后添加一个 REF 域,显示选定后的文字。


Dim rngTemp as Range
Set rngTemp = ActiveDocument.Range(Start:=0, End:=0)
ActiveDocument.MailMerge.Fields.AddSet Range:=rngTemp, _
    Name:="Name", ValueText:="Joe Smith"
Selection.Collapse Direction:=wdCollapseEnd
ActiveDocument.Fields.Add Range:=Selection.Range, _
    Type:=wdFieldRef, Text:="Name"

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号