Naming Tabs with a reference using a Macro

[Scott Isaacs]

How do I name a Workbook Sheet tab with a reference to data within that sheet
in a macro?

 

[Heera Chavan]

if suppose A1 has the name in sheet.

Sub sheetnamemacro()

Range("A1").select
activesheet.name = activecell.value

End Sub

 

[Scott Isaacs]

Yep...that worked, thank you Heera

if suppose A1 has the name in sheet.

Sub sheetnamemacro()

Range("A1").select
activesheet.name = activecell.value

End Sub