Return formula as text (<> paste values)

In a sheet with many formulas, each of which is of the form =[filename]sheetname!{cell address}, I want to return the cell address portion of the formula. Any suggestions?

Thanks.

George

Sorry. Thought that if it wasn't here it wasn't.

Found this

Function GetFormula(Cell as Range) as String
   GetFormula = Cell.Formula
End Function

here.

g