Variable for workbook name

[Mervyn Thomas]

I'm sure this must be a simple one but I cannot get my stupin brain around
it!
the line of code " Openbook =activeWorkbook.name" returns a string with the
workbook name including the ".xls". The question is how do I strip out the
".xls" from the string?

 

[Tom Ogilvy]

OpenBook = ActiveWorkbook.Name
OpenBook = Left(OpenBook,Len(OpenBook)-4)

 

[Iain King]

I'm sure this must be a simple one but I cannot get my stupin brain around
it!
the line of code " Openbook =activeWorkbook.name" returns a string with the
workbook name including the ".xls". The question is how do I strip out the
".xls" from the string?

Openbook = Left$( Openbook, Len( Openbook) - 4)

Iain King