This example loads Crystal Ball and returns TRUE in cell B2 when loading is complete.
Range("B2").Value = CB.Startup()