Simulate, through a macro, a click on a custom ribbon item-CodePudding

I've seen similar questions asked, but did not manage to find an answer to my specific problem.

I have in place a custom ribbon tab, with custom buttons. Their purpose is to each insert a QuickPart in the document.

As I have a lot of different QuickParts to be inserted, I didn't want to create a macro for each and every one.

So, when a user select an item in the ribbon, a single macro is called on, which uses the control.ID property to insert the appropriate QuickPart.

Everything works well, but now I'm asked to add keyboard shortcuts for some of these ribbon items.

Here's what I have until now:

The macro that inserts QuickParts:

Sub TalkToRibbon(control As IRibbonControl)    
    ...    
End Sub

When a shortcut is pressed, this macro is triggered:

Sub interac_obj_cart()    
    shortcut = "interac_obj_cart"
    TalkToRibbon(shortcut)
End Sub

Whether I define "shortcut" as a String or as a IRibbonControl, I get error messages (albeit different). I feel like there is something I am missing. Thanks in advance for your help

CodePudding user response：

Use keytips for ribbon controls instead of inventing something new. KeyTips are the keyboard shortcuts that appear on the Ribbon when you press the ALT key. You can assign your own KeyTips by using the keytip and getKeytip attributes. The getKeyTip callback has the following signature:

C#: string GetKeytip(IRibbonControl control)

VBA: Sub GetKeytip (control As IRibbonControl, ByRef label)

C  : HRESULT GetKeytip ([in] IRibbonControl *pControl, [out, retval] BSTR *pbstrKeytip)

Visual Basic: Function GetKeytip (control As IRibbonControl) As String

The KeyTip is displayed when the user presses the ALT key plus one to three letters.

Otherwise you need to refactor your code by extracting the handler into a separate function which accepts a controls ID and which can be called by others passing a control ID. For example:

Sub TalkToRibbon(control As IRibbonControl)    
    Call EventHandlerWhichAcceptsID  control.ID   
End Sub

And then your keyboard shortcut handler could call it as well.

CodePudding user response：

Why not simply attach keyboard shortcuts to the building blocks, themselves?

I am assuming that by quick parts you are referring to building blocks, perhaps in the quick parts gallery. You can assign keyboard shortcuts to these directly and store them in the same template that holds the building blocks.

The building blocks and shortcuts should not be stored in the Building Blocks.dotx template but in either a document or a global template.

If you need more on these concepts, here are links to my writing on:

This really has nothing to do with their placement on your custom ribbon.

You can also place a custom building blocks gallery menu on your ribbon.

Here is Greg Maxey's page on building blocks gallery controls. These can also be placed on the QAT.