Sets the image for a specific item within the control.
Sample Ribbon XML file:
<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" onLoad="CallbackOnLoad"> <ribbon startFromScratch="false"> <tabs> <tab id="MyTab" label="DropDown Sample"> <group id="MyGroup" label="DropDown Sample"> <labelControl id="myLabel1" label="Sample:" /> <labelControl id="myLabel2" label="DropDown" /> <dropDown id="myDropDown" label="My Dropdown:" showLabel="true" getItemImage="CallbackDDGetItemImage" getItemCount="CallbackDDGetItemCount" getItemLabel="CallbackDDGetItemLabel" getItemScreentip="CallbackDDGetItemScreentip" getItemSupertip="CallbackDDGetItemSupertip" getItemID="CallbackDDGetItemID" imageMso="PictureEffectsGlowGallery" getSelectedItemID="CallbackDDGetSelectedItemID" onAction="CallbackDropDownOnAction" sizeString= "WWWWWWWWWWWWW"> </dropDown> </group> </tab> </tabs> </ribbon> </customUI>
Function to be copied to a standard module:
Sub CallbackDDGetItemImage(control As IRibbonControl, _ index As Integer, _ ByRef image) ' Callback getItemImage Select Case control.ID Case "myDropDown" Set image = LoadPicture(getAppPath & "Pictures\" & _ Format(index, "00") & ".JPG") 'Case else 'or a ImageMso image = "HappyFace" End Select End Sub
You can find this sample in Sample DB 2