In this video I demonstrate how to automatically rename a sheet (tab) based on the value entered in a cell on that sheet.

Here is the code

If Not Intersect(Target, Range("C2")) Is Nothing Then

If Range("C2") = Empty Then
ActiveSheet.Name = "Client Unspecified-" & ActiveSheet.Index
Else
ActiveSheet.Name = Range("C2")
End If

End If