I think the OP may have confused
Worksheet title and SHEET Name...
WorkBOOK title = Bookname.xls
WorkSHEET title = Tab Name
For WorkSHEET title - use formulas provided previously...
for WorkBOOK Title, (i'm sure there's something easier than this...)
=MID(CELL("filename",A1),FIND("[",CELL("filename",A1))+1,FIND("]",CELL("filename",A1))-FIND("[",CELL("filename",A1))-1)