Delete file format from Thisworkbook

[crashcb18]

When using Thisworkbook sub to put the workbook's name as a variable, how do I take off the ".xlsm" so that I can use the name as a variable in "Workbooks("name").Sheets("....").Range("...") etc etc

 

[AlphaFrog]

You could use this instead.

ThisWorkbook.Sheets("....").Range("...")

 

[mikerickson]

On my Mac, the extention is requried.
Workbooks("Workbook1") will give an error, while Workbooks("Workbook1.xlsm") doesn't.


Does this line error for you?

MsgBox CStr(Workbooks(ThisWorkbook.Name).Worksheets(1).Range("A1").Value)