Question

我提前感谢您提供给我的任何帮助，我希望通过访问Publisher来执行邮件合并。我把所有东西都联系在一起，让所有东西看起来都像我想要的样子......

我想要做的是当我执行邮件合并时，我希望发布者将数据库中每个单独记录的副本保存为基于邮件合并的一个字段的特定文件。

我会尽力澄清......

其中一个邮件合并字段是ClientAccountNumber我希望合并将发布者文件的副本保存为c：\ mailmerge作为PDF，包括2014年。

所以这个文件看起来像

C：\ mailmerge \ 123456 - 2014.pdf C：\ mailmerge \ 123457 - 2014.pdf等......

有谁知道这是否可能，如果有的话，我会怎么做呢？

此致

理查德

所以我已经取得了一些进展，我已经创建了以下宏我还没有写入循环，但我觉得我越来越近了......

但是现在导出的是FileNameTemp - 2011而不是实际的客户端引用和2011 ????

我决心破解你的帮助或想法会受到大力赞赏！

Sub MailMerge() 
 '
 ' Macro1 Macro

Dim TempDocCreate 
Dim FileNameTemp As MailMergeDataField 


Set FileNameTemp = Application.ActiveDocument.MailMerge.DataSource.DataFields.Item("Box 22 Rcp Acct No") 


With ActiveDocument.MailMerge.DataSource 
    Application.ActiveDocument.ExportAsFixedFormat pbFixedFormatTypePDF, Filename:= _ 
    "L:\Operations Database\Projects\1042\PublisherPDF\2011 Merge\" & "FileNameTemp" & " - 2011" & ".pdf" 


End With

End Sub

一如既往地感谢您的帮助！

理查德

Answer 1

我现在无法验证这一点，但我认为你需要更像这样的东西：

Dim FileNameTemp As String

设置FileNameTemp = ActiveDocument.MailMerge.DataSource.DataFields.Item（“Box 22 Rcp Acct No”）。值

'不要在FileNameTemp

周围放置“”

ActiveDocument.ExportAsFixedFormat pbFixedFormatTypePDF，Filename：= _ “L：\ Operations Database \ Projects \ 1042 \ PublisherPDF \ 2011 Merge \”＆amp; FileNameTemp＆amp; “ - 2011”＆amp; “.pdf”

我无法分辨的是您的代码如何为每个数据源记录生成一个输出PDF。

Publisher Mail合并为PDF并另存为合并字段

1 个答案: