Trend Function
The following function works when called from VB:
Function TrendFunction(yRange(), xRange(), xNew, tLine As Boolean)
Dim TrendArray
TrendArray = Excel.WorksheetFunction.Trend(yRange, xRange, xNew, tLine)
TrendFunction = TrendArray(1)
End Function