SaveAs PDF and attach to email macro won't attach?!

Hi, I'm trying to get Excel 2010 to save a worksheet as a PDF (using same filepath as workbook), then attach the PDF to a new email. The 'to' email address and 'subject' reference specific cells. Everything works as desired, EXCEPT I can't get the PDF to attach.

This is a mix of different code I've found online, but I'm not sure why it won't attach.

I've also been tinkering with Ron de Bruin's page (http://www.rondebruin.nl/mail/outloo...emplatepdf.htm), but I really don't want to have an extra worksheet if possible.

How can amend the code below to get this rocket to fly? Otherwise, what other code can I use?

Please Login or Register  to view this content.

I've ran a search on this subject, but came up pretty empty handed.
Thanks for the help!