Macro To save multiple Excel sheets to multiple (individual) PDF Files

Hi,

I am aware of how to save a number of excel sheets to one single PDF, but what I want to be able to do is save 30 excel sheets that are within the same workbook, into 30 individual pdf's in a particular location.

Any ideas on a macro to do this?

Any help would be greatly appreciated as at the moment I am spending far too much time doing one by one!

Thanks,
Keith

AlphaFrog, thank you so much! this is amazing! I am going to save so much time and effort now! One more question... How do I get it to only save certain sheets as PDF? For example, I have 30 sheets overall and 10 are revenue sheets, 5 expense sheets. So in an ideal world it would know how to save the 15 sheets but not the remaining 15 sheets. At the moment I am saving every sheet down and then going into the directory to delete each of the "unwanted" sheets.
Is there a way in the code of getting it to say only do this action if it contains "Rev" or "Exp"? Something like that which would help it exclude all of the others?

Thanks again, even as it is this is a massive help!

AlphaFrog... thank you! Last Questions I promise! So how do I put in multiple cases (i.e. if the sheet name contains "Rev" or "Exp")? Also, Is it possible to add a message box at the end to get it to come up with "PDF Export complete" or something like that. I have been trying to adjust it, but keep getting errors...

Thanks again, this is such a big help.

Managed to figure out the OR statement now, that works So just need to figure out a msg box on the end of it all to say it is done ??

AlphaFrog! Perfect, works like a dream! thank you for all your help!