Loop through all messages in your inbox, read the SenderEmailAddres
property, parse it, add it to a list of folders to create if it is not
already there.
Then loop through the list and create subfolders.

Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy - Outlook, CDO
and MAPI Developer Tool

"S1lverface" wrote in message
...
Thanks for that.
I need the vba to determine the folder names for me, based on the e-mail
addresses it finds in my inbox, and then create the folders... ? I do not
want to have to manually go through my e-mails myself and decide what
folders
are needed

thanks again

"Dmitry Streblechenko" wrote:

set Inbox = Application.Session.(olFolderInbox)
set NewSubFolder = Inbox.Folders.Add("Your new folder name")

Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy - Outlook, CDO
and MAPI Developer Tool

"S1lverface" wrote in message
...

I wand to run though my full inbox and create a subfolder for each of
the
domain names therein, but leaving off the extension (.com, .org, .co.uk
etc).

For example, my inbox has 100 e-mails from a total of 25 different
company
domain names, e.r 10 from , 11 from
, 5
from

I therefore wand a folder called: Walker, Spaceage and Franksome

Thanks again