CB.GetDecVar Example

This example puts all the decision variable information for the decision variable in cell B3 into cells F2 through F9, assuming that cbDecType = 4, Custom.

In a macro, you can enter:

For i = 1 To 8
   CB.CheckData
   Worksheets("sheet3").Range("F1").Offset(i).Value = _
      CB.GetDecVar(Worksheets("sheet1").Range("B3"), i)
Next i