File Management

[JamieDuncan]

I have a workbook that upon opening asks for a reference number, eg.123

When the reference number has been given, the workbook puts that ref no in cell J10 of the sheet 'Data Input'; then it creates a folder named 123 next to the original file and saves itself under the new name of 123MASTER inside this new folder.

What I am trying to do if it is possible is have a command button that would bring up an input box asking for a new reference number (in the 123MASTER file) which would then change the name of the folder 123 into the new ref number eg. 456 add an x to it so it would become 456x (clear that it has been changed) then change the name of 123MASTER to 456xMASTER.

Is this possible?

 

[rjp]

You can use the Name function:

Name OldName As Newname

So assuming the new name is in a variable called 'refNum' you'd have something like:

Name ThisWorkbook.Path & "\" & Cells(10, "J").Value & "MASTER" As ThisWorkbook.Path & "\" & refNum & "XMASTER"
Cells(10, "J").Value = refNum & "X"