[Faisal Ijaz]

I have to sent email messages with mail merge with different subjects. I have
excel sheet which contains subject, email address fields. please help
--
With gratitude,

Faisal Ijaz

[Doug Robbins - Word MVP]

You cannot do it with mail merge out-of-the-box.

You could do it with a modification of the code used in the the article
"Mail Merge to E-mail with Attachments" at:

http://word.mvps.org/FAQs/MailMerge/...ttachments.htm


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP, originally posted via msnews.microsoft.com

"Faisal Ijaz" wrote in message
...
I have to sent email messages with mail merge with different subjects. I
have
excel sheet which contains subject, email address fields. please help
--
With gratitude,

Faisal Ijaz

[Doug Robbins - Word MVP]

You cannot do it with mail merge out-of-the-box.

You could do it with a modification of the code used in the the article
"Mail Merge to E-mail with Attachments" at:

http://word.mvps.org/FAQs/MailMerge/...ttachments.htm


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP, originally posted via msnews.microsoft.com

"Faisal Ijaz" wrote in message
...
I have to sent email messages with mail merge with different subjects. I
have
excel sheet which contains subject, email address fields. please help
--
With gratitude,

Faisal Ijaz

[Peter Jamieson]

If you are familiar with VBA, another way is to use Word's MailMerge
events and VBA to specify the subject for each email.
e.g. assuming that the subject text comes from a field in your dta
source called "mysubjectfield", in the VBA Editor, Insert a new Class
Module, name it EventClassModule, and insert the following code:

Public WithEvents App As Word.Application
Private Sub App_MailMergeBeforeRecordMerge( _
ByVal Doc As Document, _
Cancel As Boolean)
' set this to be the exact name
' of the field you want to use
' (uppercase/lowercase are
' significant here)
Const strSubjectFieldName = "mysubjectfield"
Doc.MailMerge.MailSubject = _
Doc.MailMerge.DataSource.DataFields(strSubjectFiel dName).Value
End Sub

In an ordinary module, put the following VBA
'---
Dim x As New EventClassModule
Sub MergeWithEvents()
EnableEventHandler
' Do the merge
ActiveDocument.MailMerge.Execute Pause:=False
' The events fire for all documents
' so disable them
DisableEventHandler
End Sub

Sub EnableEventHandler()
Set x.App = Word.Application
End Sub

Sub DisableEventHandler()
Set x.App = Nothing
End Sub
'---
Then, with your mail merge main document open, run the MergeWithEvents
subroutine to run your merge


Peter Jamieson

http://tips.pjmsn.me.uk

On 30/04/2010 06:41, Faisal Ijaz wrote:
I have to sent email messages with mail merge with different subjects. I have
excel sheet which contains subject, email address fields. please help

[Peter Jamieson]

If you are familiar with VBA, another way is to use Word's MailMerge
events and VBA to specify the subject for each email.
e.g. assuming that the subject text comes from a field in your dta
source called "mysubjectfield", in the VBA Editor, Insert a new Class
Module, name it EventClassModule, and insert the following code:

Public WithEvents App As Word.Application
Private Sub App_MailMergeBeforeRecordMerge( _
ByVal Doc As Document, _
Cancel As Boolean)
' set this to be the exact name
' of the field you want to use
' (uppercase/lowercase are
' significant here)
Const strSubjectFieldName = "mysubjectfield"
Doc.MailMerge.MailSubject = _
Doc.MailMerge.DataSource.DataFields(strSubjectFiel dName).Value
End Sub

In an ordinary module, put the following VBA
'---
Dim x As New EventClassModule
Sub MergeWithEvents()
EnableEventHandler
' Do the merge
ActiveDocument.MailMerge.Execute Pause:=False
' The events fire for all documents
' so disable them
DisableEventHandler
End Sub

Sub EnableEventHandler()
Set x.App = Word.Application
End Sub

Sub DisableEventHandler()
Set x.App = Nothing
End Sub
'---
Then, with your mail merge main document open, run the MergeWithEvents
subroutine to run your merge


Peter Jamieson

http://tips.pjmsn.me.uk

On 30/04/2010 06:41, Faisal Ijaz wrote:
I have to sent email messages with mail merge with different subjects. I have
excel sheet which contains subject, email address fields. please help