CB.Fit Example 1

This example selects a range of data in column D and then calls CB.Fit in a For loop. The loop fits the triangular distribution to the range of data and prints the results of each possible test to the spreadsheet (next to the original data) in cells E4 to E7.

CB.SetFitRange Range("D4:D104")
For i = 1 to 4
   Range("E3").Offset(i).Value = CB.Fit(cbDfaTriangular, i)
Next i