根据字段值在邮件合并中保存单独的Word文档

编程问答 2022-06-11

问题描述

我正在执行邮件合并，并希望根据字段名称将文档保存在单独的文件中。我遇到的问题是，它在每种情况下提取的字段值都是第一行的值。它不会移到下一行。关于我在做什么错的任何想法吗？看来问题是线 设置CurrentRec = .datafields.Item（“ CRID”） 由于它会从要提取的excel文件的第一行返回CRID的值。

谢谢。

昏暗计数器只要 昏暗的SBCTemplate作为文档 昏暗的SBCFileName作为字符串 将CurrentRec昏暗为MailMergedatafield 

Set SBCTemplate = ActiveDocument
 
For Counter = 1 To 25

With SBCTemplate.MailMerge
    .Destination = wdSendToNewDocument
    .SuppressBlankLines = True
    With .DataSource
        .FirstRecord = Counter
        .LastRecord = Counter
    Set CurrentRec = .datafields.Item("CRID")
    End With
    .Execute Pause:=False
End With
SBCFileName = "I:\" & CurrentRec & Counter & ".doc"
ActiveDocument.SaveAs2 FileName:=SBCFileName

On Error GoTo errorHandler
ActiveDocument.Close _
SaveChanges:=wdPromptToSaveChanges,_
OriginalFormat:=wdPromptUser

errorHandler： 如果Err = 4198，则MsgBox“文档未关闭” 

Next Counter

结束子

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

fieldfieldfieldfilefilefilemailmergesavewordword