❶ Excel word 邮件合并如何生成多个文档
Excel word邮件合并生成多个文档的方法如下:
1、以office2010为例,假设需根据下图Excel中的数据生成右边Word文档,每个同学单独生成一张成绩单。
❷ WORD邮件合并后如何生成多个文档
你会用邮件合并吗,先打开模板,然后选择需要链接的数据库,然后自动填充,然后合并输出,生成的就是你需要的多个文档(一个文件多页),如果需要把每个页分成一个文档一个文档,需要宏命令解决。
如何把一个word多页文档拆分为单页或多页(宏命令)
Option Explicit
Sub SplitPagesAsDocuments()
Dim oSrcDoc As Document, oNewDoc As Document
Dim strSrcName As String, strNewName As String
Dim oRange As Range
Dim nIndex As Integer
Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject")
Set oSrcDoc = ActiveDocument
Set oRange = oSrcDoc.Content
oRange.Collapse wdCollapseStart
oRange.Select
For nIndex = 1 To ActiveDocument.Content.Information(wdNumberOfPagesInDocument)
oSrcDoc.Bookmarks("\page").Range.Copy
oSrcDoc.Windows(1).Activate
Application.Browser.Target = wdBrowsePage
Application.Browser.Next
strSrcName = oSrcDoc.FullName
strNewName = fso.BuildPath(fso.GetParentFolderName(strSrcName), _
fso.GetBaseName(strSrcName) & "_" & nIndex & "." & fso.GetExtensionName(strSrcName))
Set oNewDoc = Documents.Add
Selection.Paste
oNewDoc.SaveAs strNewName
oNewDoc.Close False
Next
Set oNewDoc = Nothing
Set oRange = Nothing
Set oSrcDoc = Nothing
Set fso = Nothing
MsgBox "结束!"
End Sub
❸ 邮件如何合并生成多个单个word文档
操作方法人如下:
操作设备:戴尔电脑
操作软件:Excel2017
1、Excel文件做好准备。