Подскажите пожалуйста код, чтобы сделать свою кнопку в контекстном меню вместо стандартной кнопки:

    Set CBB = CB.Controls.Add(msoControlButton, 12951, , , True) 'Экспорт в PDF/XPS
    CBB.Caption = "Экспорт в PDF"
    CBB.OnAction = "OpenReportInPDF"
    CBB.BeginGroup = True

___________________________________
Использую Microsoft Access 2010, 64 бит.
Спасибо каждому, кто мне когда-либо здесь помог и продолжает помогать.

http://www.sql.ru/forum/1302814/pomogite-s-kontekstnym-menu