We value your feedback.
Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
'declaration Public objRibbon As IRibbonUI Public Sub OnRibbonLoad(objRib As IRibbonUI) Set objRibbon = objRib End Sub 'our callback for the SampleButton Public Sub OnButtonPress(ctl As IRibbonControl) If (ctl.ID = "SampleButton") Then MsgBox ("You have just executed the OnButtonPress callback when clicking" _ & vbCrLf & "the Ribbon SampleButton!") End If End Sub