Hi
With minimum knowledge of vba you will at least know where to put the code

:
Code:
Sub GetFormula()
With Sheets(1)
.Range("A1").Value = .ChartObjects(1).Chart.SeriesCollection(1).Trendlines(1).DataLabel.Text
End With
End Sub
Adjust the references to your convenience. The result is shown in the moment in cell A1
But that's only half way, you still will have to split the string to do further calculation. It's just to show you to get hold of the contents of the label.
Otherwise there are also ways to do the calculation directly in the sheet, but you didn't mention what kind of tendency you've got in use...