Hi Guys so my learning quest continues. I've learnt to move folders now based on there names using a search string then create a folder based on the search string results. This is the code thus far. Set objRegEx = CreateObject("VBScript.RegExp") objRegEx.Global = True objRegEx.Pattern = "^." Set objFSO = CreateObject("Scripting.FileSystemObject")Set objFolder = objFSO.GetFolder("T:\input") Set colFiles = objFolder.Files For Each objFile in colFiles strSearchString = objFile.Name Set colMatches = objRegEx.Execute(strSearchString) For Each strMatch in colMatches strFolderName1 = strMatch.Value strFolderName = strMatch.Value 'Next line saved for removing characters from the identified string 'strFolderName = Replace(strFolderName, "S", " ") strFolderName = "T:\output\" & strFolderName & "\" If Not objFSO.FolderExists(strFolderName) Then Set objNewFolder = objFSO.CreateFolder(strFolderName) End If Next objFSO.MoveFile objFile.Path, strFolderName Next '-> End Of Script Message Closes Automatically After 3 Seconds CreateObject("Wscript.Shell").Popup _ "Script Completed",3,"End Of Script",4128 Using the object pattern (objRegEx.Pattern = "^.") basically takes the first letter of the filename and creates the folder with the first letter and then places the file within that folder. Can I do a search on the same filename for a separate section to create a further sub-folder. So second search (objRegEx.Pattern = "S/d{2,}") which would be a further sub-folder. Then place the original file in that sub folder to the first folder. so using the sample above "T:\output\R\S01\filename.ext Hope that makes sense Cheers in advance