Thanks JW. That was exactly what I needed.

"JW" wrote:

On Nov 12, 9:07 pm, jeremy nickels
wrote:
Thanks.

How do I keep the tab name from becoming "somefilename.xls"? I need to
leave the .xls off so that the tab name becomes just "somefilename".

"JW" wrote:
Like Bob said, if Filename is a variable holding the filename, then it
works fine.
Filename=ActiveWorkbook.Name
Sheets("compiled").Name = Filename
or
Sheets("compiled").Name = ActiveWorkbook.Name

jeremy nickels wrote:
I need a macro to change the name of a tab to the name of the Excel file.

Here's what I've got (the original name of the tab is "compliled"). It
doesn't work:

Sheets("compiled").Select
Sheets("compiled").Name = Filename

Thanks

Could do something like this, but it is assuming that the extension
will always be 4 characters, which will most likely work for what you
need.
Sheets("compiled").Name = _
Left(ActiveWorkbook.Name, _
Len(ActiveWorkbook.Name) - 4)