The following example uses the NumIndices property to return the number of indexes belonging to the specified property of a particular VBComponent object
Debug.Print Application.VBE.VBProjects(1).VBComponents(1).Properties(40).NumIndices