Hello Jason,

Thanks for using Microsoft Newsgroup Support Service, my name is Colbert
Zhou [MSFT] and I will be working on this issue with you.

Maury's codes are almost right and just need a little modification. Thanks
to Maury's input here.

We need to change the line
If IsEmpty(Email) then GoTo TRYNEXTROW ' ALWAYS do this!
to,
If IsEmpty(Cells(r, 2)) then GoTo TRYNEXTROW ' ALWAYS do this!

IsEmpty function is used to test if a cell is empty, not the cell's value.
So in this case, even if a cell is empty, the original codes IsEmpty(Email)
returns false. As a result the Recipients.Add() will throw an exception
because the parameter is an "" string.

Please replace Email with Cells(r,2) and test again. It should work.

At last, some clarification about the Outlook Express. The Express version
of Outlook does not expose as COM Server, so it cannot be automated. That
is to say, to run the above codes, we need the Office Outlook installed on
that machine.

Please let me know if you have any future questions or concerns on this.
And I will try my best to provide future help. Have a nice day, all!

Best regards,
Colbert Zhou (colbertz @online.microsoft.com, remove 'online.')
Microsoft Online Community Support

Delighting our customers is our #1 priority. We welcome your comments and
suggestions about how we can improve the support we provide to you. Please
feel free to let my manager know what you think of the level of service
provided. You can send feedback directly to my manager at:
.