We would look at the row selected and use the number in column D as the ESTIMATE number then read the number in InvNum.txt as the replacement number - then the number in InvNum.txt should be increased by 1 and saved. (Sub WriteInvoiceNumber() does this BUT is hard coaded to overwrite cell (4,4) or D4 when, for this case it should be the selected row and column #4. In addition, WriteInvoiceNumber also calls Sub InvNumAvailable which has a line or two that will copy row 4 and move it down one row - we don't want these lines for what we are about to do.
Then we can start the renaming of folders and sub folders beginning with the Estimate number. I have started this code as sub FinalConvert() where I have selected the Estimate Number (current row, column #4) but have not changed it to the number in InvNum.txt (increase the text file by one and re-save it)
If you look at the Sub FinalConvert() file, where it says
======== WORKING HERER ==========
I have tried my very first attempt and changing a folder name
Also, we will have to look at the files created under the same folders and simply add the InvNum (which is synonymous with JobNo) beginning of each file name.
I appreciate your help.
If you could be conscious of error handling as you look through my entire code, perhaps we could work something out to write this code as well.