执行邮件合并会删除所有书签。还有什么选择?



所以我的挑战是这个。

我创建了一个启用 Word 宏的模板 (MS Word 2016(,该模板使用 MailMerge 函数使用同事完成的 Excel 文件中的数据创建文档。 完成后,他们添加他们的签名 - 来自中央网络的签名的扫描 jpeg 文件。

我的代码遵循附加到书签的原则,我不知道在执行 MailMerge 时它会删除所有书签。

我在想,如果我可以在ActiveDocument后更改我的代码,以便它不是查找Bookmark而是查找特定文本,然后我可以将此文本插入 Word 模板中的特定位置,以便在执行 MailMerge 时将其签名放在该特定 [文本] 位置。

这可能吗?

提前谢谢。

我的代码是

Sub CurrentUserSignature()
Dim folder As String
folder = "C:\MacroTemp\"
Dim path As String
path = folder & Application.UserName & ".jpg"
Dim shape As InlineShape
Set shape = ActiveDocument.Bookmarks("Signature").Range.InlineShapes.AddPicture(path, False, True)
With shape
.LockAspectRatio = msoTrue
.Height = CentimetersToPoints(4.3)
End With
End Sub

'

您只需在mailmerge 主文档中的所需位置插入无边框单单元格表格、富文本内容控件或图片内容控件,然后访问输出文档中的每一个。如果使用无边框单单元格表格,则可以为其指定固定的高度和宽度,以便自动限制插入图像的大小以适合。

如果正在生成多个输出文档,每个文档都由同一个人签名,则最好在执行之前将签名插入 mailmerge 主文档中,然后在合并后关闭该文档而不保存更改。

或者,特别是如果不同的记录需要不同的签名,并且可以从数据源收集相关详细信息,则可以向 mailmerge 主文档添加字段编码以自动添加签名图像。请参阅邮件合并提示和技巧线程中的管理邮件合并图形: http://www.msofficeforums.com/mail-merge/21803-mailmerge-tips-tricks.html 艺术 http://windowssecrets.com/forums/showthread.php/163017-Word-Mailmerge-Tips-amp-Tricks

最新更新