=MID(CELL("filename",A1),FIND("]",CELL("filename",A1))
+1,31)

Workbook must be saved to work.

HTH
Jason
Atlanta, GA

-----Original Message-----
How do you display the sheet name in a cell?
.