Thanks cool,
I did get one error message on run-time:

Compile error:
User-defined type not defined.

when i hit okay, it highlights the line

Function GetFolder(ByRef oSes As Outlook.NameSpace, ByVal sPath A
String) As MAPIFolder

Any thoughts

--
Message posted from http://www.ExcelForum.com