EMAIL MERGE WITH 2 or + ATTACHMENTS

[thomas79]

Hi I tried this tutorial:

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

and it works but it sends only the attachment in the third column
(attachment2) while the attachment1 no.
How can I fix it? I need to send 2 attachments…. I tried to use 4 columns
but it always just send the attachment in the last one...

Thank you

 

[Doug Robbins - Word MVP]

I can assure you that if you do it correctly, it will handle any number of
attachments.

This section of the code:

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

Gets the information about each attachment from the second and any following
columns of the document created by exceuting the catalog mail merge.

Most probably reason for missing attachments are errors in the path\filename
in that catalog document. The slightest error is all that it will take e.g.
two spaces where there should only be one in a folder or filename.
--
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

 

[thomas79]

Thank you fro your reply.
Unluckily the problem is not the path, I wrote it correct, if I switch the
paths the result si that it sends only the file in the last column (that
before was in the second and was unsent).
I tried to send only one file ( only 1 column for the attachment) and it
works but if I add others it send only the file in the last. I don't
understand why.

 

[Doug Robbins - Word MVP]

Nor do I understand why. I can assure you though I use the routine
regularly to send multiple attachments, sometimes as many as 10 or 12 and
the only time it does not work is if I MADE A MISTAKE IN ENTERING THE PATH
OR FILENAME.in the datasource from which the directory merge is created.



--
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