Конструктор ленты для office 10

[igorrupiter]

Здравствуйте!
Создаю ленту для word 10, как присвоить значку запуск макроса в VBA Word?
Спасибо!

[igorrupiter]

Создаю надстройку для Word 2010 в конструкторе ленты (VS 2010). Поставил кнопку, на событие click хочу чтобы выполнился макрос VBA Word. Что-то в этом роде:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As Microsoft.Office.Tools.Ribbon.Ribbo nControlEventArgs) Handles Button1.Click
Globals.ThisAddIn.Application.Run(" Макрос")
End Sub

Как сделать рабочий код? Пишу только на VBA. Пока не могу разобраться.
Можно сделать ленту через RibbonXMLEditor, но там ещё сложнее.