Macro to Rename Workbook & Delete Old workbook not working

Hi All

Thanks for the help in advance. I have been pulling my hair out and wanted to avoid bothering the forums, but really need help. Can anyone identify the issue with this macro? Its included in Sheet1. The intention is to rename the workbook based on the contents in C7, and delete the old workbook.

Please Login or Register  to view this content.

Please note the "StopInput (Target)" is another sub in sheet1

The issues I am having are:
1. The worksheet_change wont call the sub RenameWorkbook when the contents in Cell C7 are updated
2. I get error 70: permission denied, and the old workbook wont be deleted


Thanks in advance

You are closing the file running this code, then expecting the code to continue running. I have never tried that but I would be surprised if it worked. The better strategy is to save with a new name then kill the original file. This version leaves the newly saved file open. You can close it if you want as the very last action in the code but it's not necessary.

Also Target.Address gives a String with the address, but you are comparing it to a Range. You have to compare it to a String.

Please Login or Register  to view this content.