Follow these instructions Deegz.
- Go into the Visual Basic Editor (Alt + F11)
- Ensure the Projects Window is Visible: View >> Project Explorer or Ctrl + R
- Double click on the worksheet that you are trying to rename
- Select worksheet from the dropdown box where it currently says (General)
- In the second dropdown list (to the right of the first one) select 'SelectionChange'
- Paste in the following code (exclude the link at the bottom). I hope this helps you.
On Error GoTo EH
If Range("C53") = "" Then Exit Sub
If ActiveSheet.Name <> Range("C53") Then ActiveSheet.Name = Range("C53")
Exit Sub
EH:
MsgBox "The value is cell C53 has created an error" & vbCr & vbCr & "Description: " & Err.Description