Maybe you could use the UDF
And use in E4 like so, =ApplyFormula($E$1)Code:Function ApplyFormula(ByRef cell As Range) As VariantDim sf1 As String sf1 = Replace(cell.Formula, "ROW()", Application.Caller.Row) sf1 = Replace(sf1, "COLUMN()", Application.Caller.Column) sf1 = Application.ConvertFormula(sf1, xlA1, xlR1C1, , cell) sf1 = Application.ConvertFormula(sf1, xlR1C1, xlA1) ApplyFormula= Application.Caller.Parent.Evaluate(sf1) End Function
Bookmarks