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