I have to admit ignorance on this subject, but here is what is in an existing database:
Code:
strRibbonXML = strRibbonXML & "<command idMso= 'ApplicationOptionsDialog' enabled='true' onAction='OnActionOptionsButton'/>"
There there is a function defined:
Code:
Public Sub OnActionOptionsButton(control As IRibbonControl, ByRef cancelDefault)
' Callback from ApplicationOptionsDialog
' To be used to display a custom message when the File>Options menu option is selected
MsgBox "The Options dialog has been disabled.", vbInformation, "Microsoft Access Options"
cancelDefault = True
End Sub
Not sure if this can help you.