Comment insérer des images dans un fichier Office ruban personnalisé

Question

Je développe une extension de ruban personnalisé pour Excel, dans lequel un contrôle nécessite différentes images personnalisées. J'ai réussi à utiliser certaines images situées dans mon système de fichiers, mais je voudrais intégrer ces images dans le fichier .xlsm. Est-il possible de le faire et de les référencer à partir du code VBA qui met à jour l'image du contrôle?

Pour des fins de test, c'est le XML qui définit mon ruban personnalisé:

<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" onLoad="ribbonLoaded"> 
    <ribbon> 
    <tabs> 
     <tab idMso="TabHome" > 
     <group id="customGroup1" label="My Group" insertAfterMso="GroupFont"> 
      <button id="customButton1" label="Click Me" size="large" onAction="Macro1" getImage="getButtonImage"/> 
     </group> 
     </tab> 
    </tabs> 
    </ribbon> 
</customUI> 

Et ceci est la macro qui modifie l'image du contrôle customButton1:

Dim imgIndex As Long 

Public Sub getButtonImage(ByVal control As IRibbonControl, ByRef Image) 
Select Case control.ID 
    Case "customButton1" 
    Set Image = LoadPicture("img" + Trim(Str(imgIndex)) + ".bmp") 
    imgIndex = (imgIndex + 1) Mod 2 
    End Select 
End Sub 

J'ai essayé d'ajouter les fichiers bmp à l'intérieur du fichier .xlsm et les référencent en mettant à jour le fichier de relations (.rels), mais je ne sais pas comment les référencer depuis VBA et surtout, quand j'ouvre le fichier avec Excel et le sauvegarde, ils sont automatiquement supprimés ...

Toute aide est appréciée!

Answer 1

Si l'image est intégrée dans le customUI, vous n'avez pas besoin de VBA pour les ajouter à un contrôle. Il suffit d'utiliser le même ID pour l'image dans une balise image:

<button id="button1" label="Test" size="large" image="TestID" onAction="ButtonOnAction" /> 

Mon échantillon est adressant l'image avec l'ID « testid », qui doit être trouvé dans le fichier XML customUI - développez le nœud customUI dans le Custom UI Editor trouver ou changez l'identifiant de l'image (ou utilisez l'éditeur pour ajouter une nouvelle image).