Application.AddIns (Word)

Returns an AddIns collection that represents all available add-ins, regardless of whether they're currently loaded.

The AddIns collection includes the global templates and Word add-in libraries (WLLs) listed in the Templates and Add-ins dialog box. For information about returning a single member of a collection, see Returning an object from a collection.

Dim intAddIns as Integer 
 
intAddIns = AddIns.Count