In the following section of the code you just use the .CC and .BCC features
of the Outlook Object Model as follows
With oItem
.Subject = mysubject
.body = ActiveDocument.Content
Set Datarange = Maillist.Tables(1).Cell(Counter, 1).Range
Datarange.End = Datarange.End - 1
.To = Datarange
For i = 2 To Maillist.Tables(1).Columns.Count
Set Datarange = Maillist.Tables(1).Cell(Counter, i).Range
Datarange.End = Datarange.End - 1
.Attachments.Add Trim(Datarange.Text), olByValue, 1
Next i
.CC = "Firstemailaddress; secondemailaddress"
.BCC = "Firstemailaddress; secondemailaddress"
.Send
End With
Likewise, you can get the subject of the email from a cell in the table in
the same way as the code gets hold of the attachments or the .To address.

Signature
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
> Dear Doug,
> thanks of the response. while the link which you sent takes care of the
[quoted text clipped - 34 lines]
>> > thanks
>> > raghu
JH-LKY - 17 Jul 2006 21:53 GMT
The magic is almost working for me. I have read multiple posts, finally
muddled through creating a macro and I can send to my list from Outlook, it
looks like a one-to-one email, and there is a PDF attachment. Except,
somewhere I've missed how to make my message show up. I have created a new
Word doc, merged it, and then executed the macro - but I still get an empty
message with the attachment. What am I doing wrong??
> In the following section of the code you just use the .CC and .BCC features
> of the Outlook Object Model as follows
[quoted text clipped - 55 lines]
> >> > thanks
> >> > raghu
Doug Robbins - Word MVP - 18 Jul 2006 04:46 GMT
See response to your later post. If you are not Raghu, don't butt into an
existing thread.

Signature
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
> The magic is almost working for me. I have read multiple posts, finally
> muddled through creating a macro and I can send to my list from Outlook,
[quoted text clipped - 68 lines]
>> >> > thanks
>> >> > raghu