Attach files to E-mail based on partial filename

[MUCa346]

Hi All,

I'm currently creating E-mails containing a table of material numbers in the body of the message. The E-mail is generated with a macro from a table in excel. In some folder - say on the desktop - I have PDF files for each material Number. Each file is called 0012345_Product-Name.pdf where 0012345 is the material number (always 7 digits). I want the macro to look for the pdf for each material number found in the table and add it to the E-mail as an attachment. With constant, known file names this wouldn't be much of an issue. However, I'm having trouble getting the macro to only search for the first 7 digits of the filename and select it based on that. Is there any way of doing this?

Thanks!
P.s.: Since we are talking up to several 100 PDF's, it would also be great to zip them, once selected - if at all possible, before attaching them to the E-mail

[Bernie Deitrick]

To find the correct file, for a list of parts starting in cell A2, for example:

Please Login or Register  to view this content.

For the zipping part:

http://www.rondebruin.nl/win/s7/win001.htm

[MUCa346]

Thanks for the help! I've got it to work that far, and have no issues, attaching the files to an E-mail. Turned out a lot simpler than anything I was thinking about. I did play with rondebruin's code's a bit after posting yesterday. I tried working them with your code but it seems to get hung up. It never gets beyond:

Please Login or Register  to view this content.

It simply stays there for hours, even when just zipping up one or two 100kb files..
Here's the full code for this part:

Please Login or Register  to view this content.

Any suggestions?