Ashie,
If I understand You correct You would like to have the workbookname in a cell.
Following code (borrowed from Chip Pearson) generate the name:
=MID(CELL("filnamn",A1),FIND("[",CELL("filnamn",A1))+1,FIND("]",CELL("filnamn",A1))-FIND("[",CELL("filnamn",A1))-1)
HTH,
Dennis