Try something like
Dim CAI As Office.COMAddIn
For Each CAI In Application.COMAddIns
If CAI.Connect = True Then
Debug.Print CAI.Description, CAI.progID
End If
Next CAI
This will list both COM Add-Ins that are installed and connected for
the current user (which will be listed in the COM Add-Ins dialog) as
well as CAIs that are loaded for all users (not listed in the CAI
dialog).
If you want a list of all CAIs, not just those currently loaded, get
rid of the If conditional in the code.
Cordially,
Chip Pearson
Microsoft Most Valuable Professional,
Excel, 1998 - 2010
Pearson Software Consulting, LLC
www.cpearson.com