=""&MID(CELL("filename",Sheet1!$A$1),FIND("]",CELL("filename",Sheet1!$A$1))+1,256)
1. Change filename to the your workbook's filename.
2. Change Sheet1 to your current sheetname where you have pasted the formula.
This formula below which I found on many forums doesn't really work because...