I am searched alot about this and tried many times to collect it but unfortunitly every time I got only errors so please if anyone can help me in this. I am trying from excel VBA to Find a string in new incoming mail body (outlook) if find it then 1- create a sub-folder in a folder it's path in a cell in thisworkbook 2- rename the creted folder by sender company name which will be after "@" and before ".com" in sender email 3- download attachments if any to the created folder 4- get a copy of this email to the same folder.