Bonjour,
est-ce que quelqu'un peut me dire si les callbacks fonctionnent sous Project 2010 ?
J'essaye de charger une image personnalisée comme icone dans un ruban personnalisé. Et ça ne fonctionne pas. Le callback n'est pas appelé
Pour info, voici le code que j'utilise
et voici le code du callback
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Sub AddCustomUI() Dim customUiXml As String customUiXml = "<mso:customUI xmlns:mso=""http://schemas.microsoft.com/office/2009/07/customui"">" _ & "<mso:ribbon><mso:tabs><mso:tab id=""myTab"" label=""Kit CP/DP"">" _ & "<mso:group id=""group1"">" _ & "<mso:button id=""button1"" label=""Kit CP/DP"" size=""large"" " _ & "image=""ImageUmanis"" getImage=""GetButtonImage"" onAction=""Affiche_MenuGeneral""/>" _ & "</mso:group></mso:tab></mso:tabs></mso:ribbon></mso:customUI>" ActiveProject.SetCustomUI (customUiXml) End Sub
Par contre le code suivant marche, quand j'utilise une icone du catalogue
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 Public Sub GetButtonImage(ByVal control As IRibbonControl, ByRef image) Set image = stdole.LoadPicture(ActiveProject.Path & "\Umanis Ico 32x32.PNG") End Sub
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Sub AddCustomUI() Dim customUiXml As String customUiXml = "<mso:customUI xmlns:mso=""http://schemas.microsoft.com/office/2009/07/customui"">" _ & "<mso:ribbon><mso:tabs><mso:tab id=""myTab"" label=""Kit CP/DP"">" _ & "<mso:group id=""group1"">" _ & "<mso:button id=""button1"" label=""Kit CP/DP"" size=""large"" " _ & "imageMso=""BlogHomePage"" onAction=""Affiche_MenuGeneral""/>" _ & "</mso:group></mso:tab></mso:tabs></mso:ribbon></mso:customUI>" ActiveProject.SetCustomUI (customUiXml) End Sub
Partager