You could develop this UDF
Function LastInFormula(rng As Range)
Dim arrFmla As Variant
arrFmla = Split(rng.Formula, "+")
LastInFormula = arrFmla(UBound(arrFmla))
End Function
Then in Excel
[EDIT]
This should allow for positive and negative situations e.g."=J9+9-4"
Function LastInFormula(rng As Range)
Dim arrFmla As Variant
Dim strformula As String
If InStr(rng.Formula, "+") > 0 Then
strformula = Replace(rng.Formula, "+", " +", 1)
Else
strformula = rng.Formula
End If
If InStr(strformula, "-") > 0 Then strformula = Replace(rng.Formula, "-", " -", 1)
arrFmla = Split(strformula, " ")
LastInFormula = arrFmla(UBound(arrFmla)) * 1
End Function
Bookmarks