Skip to content

Instantly share code, notes, and snippets.

@rediffusion

rediffusion/Office VBA_12

Last active July 30, 2019 13:06
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save rediffusion/055c7c0ddfe7a8795e7925306fa63dbd to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save rediffusion/055c7c0ddfe7a8795e7925306fa63dbd to your computer and use it in GitHub Desktop.
Download ZIP
NOTE: Для »» `Menu` и `Dynamic Menu` подходит тоже!
Raw
Office VBA_12
Sub CallbackGetKeytip(control As IRibbonControl, ByRef keytip)
Select Case control.ID
Case "MyBtn1"
keytip = "Bt1"
Case "MyBtn2"
keytip = "Bt2"
End Select
End Sub
Raw
Office XML_14
<button
id="MyBtn1"
imageMso="BevelShapeGallery"
getKeytip="CallbackGetKeytip"
onAction="MyButtonCallbackOnAction""/>
<button
id="MyBtn2"
imageMso="BevelShapeGallery"
getKeytip="CallbackGetKeytip"
onAction="MyButtonCallbackOnAction""/>
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment