GetSlope
From scripting
Function GetSlope(X1 As Variant, X2 As Variant, Y1 As Variant, Y2 As Variant) As Double GetSlope = (Y1 - Y2) / (X1 - X2) End Function
Function GetSlope(X1 As Variant, X2 As Variant, Y1 As Variant, Y2 As Variant) As Double GetSlope = (Y1 - Y2) / (X1 - X2) End Function