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