VBA Macro To Create An Excel File With Same Sheet Name As Workbook Name

[snb]

@Doc

Avoid Let , it's redundant.
That's also the case of any variable in this code.
The declaration makes no difference either.
I prefer methods that serve a certain purpose (getbasename), instead of work'around and around and aroud's.

The first works if the workbook hasn't been saved yet.
The secound one is necessary when a workbook has an extension that contradicts the filetype.