AfterOptimizationEvent

Private Sub PortfolioOptRuntime_AfterOptimizationEvent(IterationsCompleted As Long)
   'Your code is here
End Sub

In this signature, parameters or arguments are defined as follows: