Возвращает значение типа Long, содержащее число элементов в семействе. Только для чтения.

Пример
В данном примере приводится программа, использующая свойство CommandBarEvents. Это свойство применяется в программах для обработки нажатия кнопки мыши в панели команд.

Private WithEvents ce As CommandBarEvents

Sub Test()
    Dim c As CommandBarControl
    Set c = Application.VBE.CommandBars("Сервис").Controls(1)
    Set ce = Application.VBE.Events.CommandBarEvents(c)
End Sub

Private Sub ce_Click(ByVal CommandBarControl As Object, Handled As Boolean, CancelDefault As Boolean)
    ' Место для программы обработки событий.
End Sub