Instead of [VBA]objItem.SaveAs myPath & "\" & strname & "_" & strdate & ".msg", olMSG[/VBA]try
[VBA]objItem.SaveAs myPath & "\" & strname & "_" & split(strdate," ")(0) & "_" & split(strdate," ")(1) & split(strdate," ")(2) & ".msg", olMSG[/VBA]Charlize
Quote Originally Posted by dbe4876
Thanks so much! That's soooo helpful!!!

After I copied your code in and tried it to make sure it was working I did a couple of tweaks of my own.
  1. I used a period instead of an underscore for
  2. I used an underscore instead of "--" in the statement:
That gives me a filename more to my liking (e.g., "PRB000013662840_5.20.2011 10.27.17 AM.msg")

I may look for a way to remove that space between the date and time (maybe use an underscore there), and also between time and AM/PM (no space there).

Thanks again!
Dave