A. Set O = AppObject.AddItem("KeyName")

B. Set O = CreateObject("Excel.Application")

C. Set O = GetObject(,"MyApp.AppObject")

D. Set O = GetObject("","MyApp.AppObject")