getImage

Sets a IPictureDisp object or a ImageMso to the ribbon control. Example in User Defined Icons / Pictures in Ribbon Controls

Public Sub getImages(control As IRibbonControl, _
                     ByRef image)
' Loads a picture without transparency into the ribbon
' Only valid picture formats must be used (see OH).
  
Set Image = LoadPicture(getAppPath & control.Tag)
  
' or a ImageMso
image = "HappyFace"
  
End Sub

Function: getAppPath