You might try printing the list of Com Add-ins to make sure you are using the correct descriptor.
For lngIndex = 1 To oCAIs.Count
Debug.Print Application.COMAddIns(lngIndex).Description

__________________
Greg Maxey
Please visit my web site at http://www.gregmaxey.com/