USysRibbons

'----Microsoft Office Object library 12.0----
Public Sub OnSelectLink(ctr As IRibbonControl)
    FollowHyperlink ctr.Tag
End Sub

<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui">
  <commands>
    <command idMso="ApplicationOptionsDialog" enabled="false" />
    <command idMso="FileExit" enabled="false" />
  </commands>
  <ribbon startFromScratch="true">
    <officeMenu>
      <button idMso="FileNewDatabase" visible="false" />
      <button idMso="FileOpenDatabase" visible="false" />
      <button idMso="FileCloseDatabase" visible="false" />
      <splitButton idMso="FileSaveAsMenuAccess" visible="false" />
      <menu id="linkmenu" label="Links" imageMso="HyperlinkInsert">
        <menuSeparator id="Sep1" title="検索" />
        <button id="btn01" label="グーグル" tag="http://www.google.co.jp" onAction="OnSelectLink" />
        <button id="btn02" label="グーグルMap" tag="http://maps.google.co.jp/maps" onAction="OnSelectLink" />
        <button id="btn03" label="ドラぷら高速料金検索" tag="http://www.driveplaza.com/dp/SearchQuick" onAction="OnSelectLink" />
        <button id="btn04" label="道路情報" tag="http://www.drivetraffic.jp/map.html" onAction="OnSelectLink" />
        <button id="btn05" label="道路情報" tag="http://www.jartic.or.jp" onAction="OnSelectLink" />
      </menu>
    </officeMenu>
  </ribbon>
</customUI>

要素<comannd>でAceessのオプション(ApplicationOptionsDialog)と Accessの終了(FileExit)を使用不可にすると、Officeメニューの各コマンドボタンは非活性化になる。また、要素<officeMenu>内<button>を不可視とすることが可能。
カスタムメニューとボタンを追加、OnActionでコールバック呼出し。