How do I insert the file name as my Worksheet name in the tab?

D

Dennis

I was wondering how do I automatically instert my file name as my tab name
instead of "Sheet 1" without having to right click and select "rename" and
typing the file name into the tab?
 
G

Gary''s Student

Try this tiny macro:

Sub hdksa()
ActiveSheet.Name = ActiveSheet.Parent.Name
End Sub
 
Top