カスタム検索
リボン関連

ボタンのイメージを外部から読み込む

今回はボタンの画像を外部から読み込む方法を紹介します。

 

1. Office 2007ファイルを開きます(今回はExcelファイル)。
2. 標準モジュールに下記コードを貼り付けて上書き保存した後、ファイルを閉じます。

Sub myButton_getImage(control As IRibbonControl, ByRef image)
  Set image = LoadPicture("M:\Images\image.bmp")
End Sub
※ 上記コードでは「M:\Images\image.bmp」を読み込みます。

3. Custom UI Editor Toolで2.のファイルを開きます。
4. 下記コードを貼り付け、上書き保存します。
<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui">
  <ribbon startFromScratch="false">
    <tabs>
      <tab id="customTab" label="Custom Tab" insertBeforeMso="TabHome">
        <group id="customGroup" label="Custom Group">
          <button id="myButton" label="My Button" getImage="myButton_getImage" size="large" onAction="myButton_onAction" />
        </group>
      </tab>
    </tabs>
  </ribbon>
</customUI>

5. 4.のファイルをマクロを有効にして開くとCustom Tabタブの「My Button」ボタンに、2.のコードで指定した画像が表示されていることが確認できます。

以上で作業は終了です。
上記のように「getImage」属性で指定したプロシージャ内で、LoadPicture関数を使って画像を指定すれば、画像を外部から読み込むことができます。