如何用vba操作word文档的邮件合并?

word vba中MailMerge对象代表邮件合并。

一个word文档中有且仅有一个MailMerge对象。

所有与邮件合并相关的操作都可以通过操作MailMerge对象来实现。

以下是一个显示邮件合并连接字符串的代码:

Sub QQ1722187970()
    Dim oMailMerge As MailMerge
    Dim oDoc As Document
    Set oDoc = Word.ActiveDocument
    Set oMailMerge = oDoc.MailMerge
    Dim oMailMergeDataSource As MailMergeDataSource
    '邮件合并对象
    With oMailMerge
        '邮件合并的数据源
        Set oMailMergeDataSource = .DataSource
        With oMailMergeDataSource
            '输出连接字符串
            Debug.Print .ConnectString
        End With
    End With
End Sub

 

       

发表评论