Skip to content

Instantly share code, notes, and snippets.

@tanzilhuda
Created August 5, 2020 20:22
Show Gist options
  • Save tanzilhuda/dc81359e726ca341a17feaae18747ada to your computer and use it in GitHub Desktop.
Save tanzilhuda/dc81359e726ca341a17feaae18747ada to your computer and use it in GitHub Desktop.
Rename Sheet basis of row or column name
Sub RenameSheet()
Dim rs As Worksheet
For Each rs In Sheets
rs.Name = rs.Range("B2")
Next rs
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment