This example opens the Define Forecast dialog so you can define or redefine a forecast.
Range("B5").Select CB.DefineFore