Attribute VB_Name = "RibbonCallbacks"
Option Explicit 'Потребовать явного объявления всех переменных в файле

' (компонент: customUI, атрибут: onLoad), 2010+
Sub СобытиеЗагрузкиЛенты(ribbon As IRibbonUI)
    'Объявите глобальную переменную объекта ленты: Public gobjRibbon As IRibbonUI
    Set gobjRibbon = ribbon
End Sub

'идButtonКурсыОтобразитьКурс (компонент: button, атрибут: onAction), 2010+
Sub СобытиеНажатияButtonКурсыОтобразитьКурс(control As IRibbonControl)
    MsgBox "Сработала функция onAction элемента " + control.ID
End Sub

'идButtonКурсыЗаписатьЭлемент (компонент: button, атрибут: onAction), 2010+
Sub СобытиеНажатияButtonКурсыЗаписатьЭлемент(control As IRibbonControl)
    MsgBox "Сработала функция onAction элемента " + control.ID
End Sub

'идButtonКурсыИзменитьЭлемент (компонент: button, атрибут: onAction), 2010+
Sub СобытиеНажатияButtonКурсыИзменитьЭлемент(control As IRibbonControl)
    MsgBox "Сработала функция onAction элемента " + control.ID
End Sub

'идButtonКурсыУдалитьЭлемент (компонент: button, атрибут: onAction), 2010+
Sub СобытиеНажатияButtonКурсыУдалитьЭлемент(control As IRibbonControl)
    MsgBox "Сработала функция onAction элемента " + control.ID
End Sub

'идCheckBoxКурсыОбластьЗнаний0 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыОбластьЗнаний1 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыОбластьЗнаний2 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыОбластьЗнаний3 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыОбластьЗнаний4 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыОбластьЗнаний5 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыОбластьЗнаний6 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыОбластьЗнаний7 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыОбластьЗнаний8 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыОбластьЗнаний9 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыОбластьЗнаний10 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыОбластьЗнаний11 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыОбластьЗнаний12 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыОбластьЗнаний13 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыОбластьЗнаний14 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыОбластьЗнаний15 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыОбластьЗнаний16 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыОбластьЗнаний17 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыОбластьЗнаний18 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыОбластьЗнаний19 (компонент: checkBox, атрибут: onAction), 2010+
Sub СобытиеПереключенияCheckBoxКурсыОбластьЗнаний(control As IRibbonControl, pressed As Boolean)
    MsgBox "Сработала функция onAction элемента " + control.ID + " (нажатость = " + pressed + ")"
End Sub

'идCheckBoxКурсыОбластьЗнаний0 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыОбластьЗнаний1 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыОбластьЗнаний2 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыОбластьЗнаний3 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыОбластьЗнаний4 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыОбластьЗнаний5 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыОбластьЗнаний6 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыОбластьЗнаний7 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыОбластьЗнаний8 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыОбластьЗнаний9 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыОбластьЗнаний10 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыОбластьЗнаний11 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыОбластьЗнаний12 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыОбластьЗнаний13 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыОбластьЗнаний14 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыОбластьЗнаний15 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыОбластьЗнаний16 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыОбластьЗнаний17 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыОбластьЗнаний18 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыОбластьЗнаний19 (компонент: checkBox, атрибут: getPressed), 2010+
Sub УстановитьЗначениеCheckBoxКурсыОбластьЗнаний(control As IRibbonControl, ByRef pressed)
    pressed = True
End Sub

'идCheckBoxКурсыКурс0 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыКурс1 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыКурс2 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыКурс3 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыКурс4 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыКурс5 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыКурс6 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыКурс7 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыКурс8 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxКурсыКурс9 (компонент: checkBox, атрибут: onAction), 2010+
Sub СобытиеПереключенияCheckBoxКурсыКурс(control As IRibbonControl, pressed As Boolean)
    MsgBox "Сработала функция onAction элемента " + control.ID + " (нажатость = " + pressed + ")"
End Sub

'идCheckBoxКурсыКурс0 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыКурс1 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыКурс2 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыКурс3 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыКурс4 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыКурс5 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыКурс6 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыКурс7 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыКурс8 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxКурсыКурс9 (компонент: checkBox, атрибут: getPressed), 2010+
Sub УстановитьЗначениеCheckBoxКурсыКурс(control As IRibbonControl, ByRef pressed)
    pressed = True
End Sub

'идButtonКурсыСервисПерезагрузить (компонент: button, атрибут: onAction), 2010+
Sub СобытиеНажатияButtonКурсыСервисПерезагрузить(control As IRibbonControl)
    MsgBox "Сработала функция onAction элемента " + control.ID
End Sub

'идButtonЗапоминаниеОтобразитьФорму (компонент: button, атрибут: onAction), 2010+
Sub СобытиеНажатияButtonЗапоминаниеОтобразитьФорму(control As IRibbonControl)
    MsgBox "Сработала функция onAction элемента " + control.ID
End Sub

'идToggleButtonЗапоминаниеВключитьОповещение (компонент: toggleButton, атрибут: onAction), 2010+
Sub СобытиеНажатияToggleButtonЗапоминаниеВключитьОповещение(control As IRibbonControl, pressed As Boolean)
    MsgBox "Сработала функция onAction элемента " + control.ID + " (нажатость = " + pressed + ")"
End Sub

'идToggleButtonЗапоминаниеВключитьОповещение (компонент: toggleButton, атрибут: getPressed), 2010+
Sub УстановитьЗначениеToggleButtonЗапоминаниеВключитьОповещение(control As IRibbonControl, ByRef pressed)
    pressed = True
End Sub

'идCheckBoxЗапоминаниеТипФормы0 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеТипФормы1 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеТипФормы2 (компонент: checkBox, атрибут: onAction), 2010+
Sub СобытиеПереключенияCheckBoxЗапоминаниеТипФормы(control As IRibbonControl, pressed As Boolean)
    MsgBox "Сработала функция onAction элемента " + control.ID + " (нажатость = " + pressed + ")"
End Sub

'идCheckBoxЗапоминаниеТипФормы0 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеТипФормы1 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеТипФормы2 (компонент: checkBox, атрибут: getPressed), 2010+
Sub УстановитьЗначениеCheckBoxЗапоминаниеТипФормы(control As IRibbonControl, ByRef pressed)
    pressed = True
End Sub

'идCheckBoxЗапоминаниеОбластьЗнаний0 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний1 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний2 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний3 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний4 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний5 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний6 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний7 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний8 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний9 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний10 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний11 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний12 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний13 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний14 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний15 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний16 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний17 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний18 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний19 (компонент: checkBox, атрибут: onAction), 2010+
Sub СобытиеПереключенияCheckBoxЗапоминаниеОбластьЗнаний(control As IRibbonControl, pressed As Boolean)
    MsgBox "Сработала функция onAction элемента " + control.ID + " (нажатость = " + pressed + ")"
End Sub

'идCheckBoxЗапоминаниеОбластьЗнаний0 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний1 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний2 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний3 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний4 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний5 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний6 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний7 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний8 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний9 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний10 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний11 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний12 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний13 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний14 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний15 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний16 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний17 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний18 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеОбластьЗнаний19 (компонент: checkBox, атрибут: getPressed), 2010+
Sub УстановитьЗначениеCheckBoxЗапоминаниеОбластьЗнаний(control As IRibbonControl, ByRef pressed)
    pressed = True
End Sub

'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний0 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний1 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний2 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний3 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний4 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний5 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний6 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний7 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний8 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний9 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний10 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний11 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний12 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний13 (компонент: checkBox, атрибут: onAction), 2010+
Sub СобытиеПереключенияCheckBoxЗапоминаниеГруппыЭлементовЗнаний(control As IRibbonControl, pressed As Boolean)
    MsgBox "Сработала функция onAction элемента " + control.ID + " (нажатость = " + pressed + ")"
End Sub

'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний0 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний1 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний2 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний3 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний4 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний5 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний6 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний7 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний8 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний9 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний10 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний11 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний12 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеГруппыЭлементовЗнаний13 (компонент: checkBox, атрибут: getPressed), 2010+
Sub УстановитьЗначениеCheckBoxЗапоминаниеГруппыЭлементовЗнаний(control As IRibbonControl, ByRef pressed)
    pressed = True
End Sub

'идCheckBoxЗапоминаниеКурс0 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеКурс1 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеКурс2 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеКурс3 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеКурс4 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеКурс5 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеКурс6 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеКурс7 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеКурс8 (компонент: checkBox, атрибут: onAction), 2010+
'идCheckBoxЗапоминаниеКурс9 (компонент: checkBox, атрибут: onAction), 2010+
Sub СобытиеПереключенияCheckBoxЗапоминаниеКурс(control As IRibbonControl, pressed As Boolean)
    MsgBox "Сработала функция onAction элемента " + control.ID + " (нажатость = " + pressed + ")"
End Sub

'идCheckBoxЗапоминаниеКурс0 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеКурс1 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеКурс2 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеКурс3 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеКурс4 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеКурс5 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеКурс6 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеКурс7 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеКурс8 (компонент: checkBox, атрибут: getPressed), 2010+
'идCheckBoxЗапоминаниеКурс9 (компонент: checkBox, атрибут: getPressed), 2010+
Sub УстановитьЗначениеCheckBoxЗапоминаниеКурс(control As IRibbonControl, ByRef pressed)
    pressed = True
End Sub

'идButtonЗапоминаниеСервисПерезагрузить (компонент: button, атрибут: onAction), 2010+
Sub СобытиеНажатияButtonЗапоминаниеСервисПерезагрузить(control As IRibbonControl)
    MsgBox "Сработала функция onAction элемента " + control.ID
End Sub

'идButtonБазаДанныхОбновитьИдентификаторы (компонент: button, атрибут: onAction), 2010+
Sub СобытиеНажатияButtonБазаДанныхОбновитьИдентификаторы(control As IRibbonControl)
    MsgBox "Сработала функция onAction элемента " + control.ID
End Sub

'идButtonПрочееРезервнаяКопияКнигТекущей (компонент: button, атрибут: onAction), 2010+
Sub СобытиеНажатияButtonПрочееРезервнаяКопияКнигТекущей(control As IRibbonControl)
    MsgBox "Сработала функция onAction элемента " + control.ID
End Sub

'идButtonПрочееРезервнаяКопияКнигОткрытых (компонент: button, атрибут: onAction), 2010+
Sub СобытиеНажатияButtonПрочееРезервнаяКопияКнигОткрытых(control As IRibbonControl)
    MsgBox "Сработала функция onAction элемента " + control.ID
End Sub