"Mervyn Thomas" wrote in message
...
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