CB.EnumFore Example

This example runs a simulation, initializes all internal variables, and then steps through all the forecasts, creates range objects from the returned string, and opens the forecast window for each one. Note that the range objects are created with absolute cell references.

CB.CheckData
Dim S As String
Dim R As Range
CB.Simulation 1500
s = CB.EnumFore
While s <> ""
   Set r = Range(s)
   r.Select
   CB.OpenFore
   s = CB.EnumFore
Wend