обновление файлов Ribbon XML Editorm, сохранение

отдельных файлов макросов, добавление результирующего файла гостомизатора

RibbonCallbacks.bas

@@ -0,0 +1,63 @@
+Option Explicit 'Потребовать явного объявления всех переменных в файле
+
+'TableFormatter (элемент: button, атрибут: onAction), 2010+
+Private Sub TableFormatter(control As IRibbonControl)
+    MsgBox "Сработала процедура, заданная в onAction элемента " & control.ID
+End Sub
+
+'PicFormatter (элемент: button, атрибут: onAction), 2010+
+Private Sub PicFormatter(control As IRibbonControl)
+    MsgBox "Сработала процедура, заданная в onAction элемента " & control.ID
+End Sub
+
+'AddListA4 (элемент: button, атрибут: onAction), 2010+
+Private Sub AddListA3(control As IRibbonControl)
+    'MsgBox "Сработала процедура, заданная в onAction элемента " & control.ID
+    
+    Call ML_AddListA4
+    
+End Sub
+
+'AddListA3 (элемент: button, атрибут: onAction), 2010+
+Private Sub AddListA4(control As IRibbonControl)
+    'MsgBox "Сработала процедура, заданная в onAction элемента " & control.ID
+    
+    Call ML_AddListA3
+       
+    
+End Sub
+
+'StampForm5 (элемент: button, атрибут: onAction), 2010+
+Private Sub AddStampForm5(control As IRibbonControl)
+    MsgBox "Сработала процедура, заданная в onAction элемента " & control.ID
+End Sub
+
+'StampForm6 (элемент: button, атрибут: onAction), 2010+
+Private Sub AddStampForm6(control As IRibbonControl)
+    MsgBox "Сработала процедура, заданная в onAction элемента " & control.ID
+End Sub
+
+'StampFrame (элемент: button, атрибут: onAction), 2010+
+Private Sub AddFrame(control As IRibbonControl)
+    MsgBox "Сработала процедура, заданная в onAction элемента " & control.ID
+End Sub
+
+'StampLeftUp (элемент: button, атрибут: onAction), 2010+
+Private Sub AddStampLeftUp(control As IRibbonControl)
+    MsgBox "Сработала процедура, заданная в onAction элемента " & control.ID
+End Sub
+
+'StampLeftDown (элемент: button, атрибут: onAction), 2010+
+Private Sub AddStampLeftDown(control As IRibbonControl)
+    MsgBox "Сработала процедура, заданная в onAction элемента " & control.ID
+End Sub
+
+'StampLeftMiddle (элемент: button, атрибут: onAction), 2010+
+Private Sub AddStampLefMid(control As IRibbonControl)
+    MsgBox "Сработала процедура, заданная в onAction элемента " & control.ID
+End Sub
+
+'StampPageNumber (элемент: button, атрибут: onAction), 2010+
+Private Sub AddPageNumber(control As IRibbonControl)
+    MsgBox "Сработала процедура, заданная в onAction элемента " & control.ID
+End Sub