I recently modified the code in that article to try and overcome an issue
that a lot of people were having when they did not follow the instructions
correctly and it seems like the following line of code

For j = 1 To Source.Sections.Count

needs to be modified to

For j = 1 To Source.Sections.Count - 1

Try that and let me know how you get on.


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

"Paul Ette" Paul wrote in message
...
Hi all,

I have been trying to set up a mailmerge with attachments using Doug's
macro
with some degree of success.

When I run the macro the emails with attachments are created and sent
however I seem to get one extra blank email being produced to the last
person
in the catalog.

Any ideas would be gratefully accepted and tried.

Regards

Paul