I have a workbook that needs to get sent out to several different recipients.
Occasionally some of those recipients might be duplicates. How can I make sure
that duplicate recipients receive only one copy of the workbook?

What I've done to read the list of email recipients is use a for-next loop.
Something like this:

For a = 1 to 7
email(a) = Cells(a, 2) 'assuming the list is in column B
next a

Then I use another for-next loop to email the workbook. I'll bet there's
probably a better way of doing this. Any help would be appreciated. Thanks.