Sie sind hier: dynamicMenu - getContent
dynamicMenu - getContent
Gibt einen XML String an das Ribbon Control zurück, welcher die Einträge des dynnamicMenu enthält.
Beispiel XML Ribbon Datei:
<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" onLoad="CallbackOnLoad"> <ribbon startFromScratch="false"> <tabs> <tab id="MyTab" label="Button Demo"> <group id="MyGroup" label="Button Demo"> <labelControl id="myLabel1" label="Beispiel:" /> <labelControl id="myLabel2" label="Menüs" /> <menu id="MyMenu" label="Beispiel Menu" itemSize="normal"> <dynamicMenu id="MyDynamicMenu" label="Dynamisches Menü" getContent="CallbackGetContent"/> </menu> </group> </tab> </tabs> </ribbon> </customUI>
Funktion in einem Standardmodul:
Sub CallbackGetContent(control As IRibbonControl, _ ByRef XMLString) ' Gibt dem dynamicMenu sechs Einträge zurück Dim lngDummy As Long Dim strDummy As String Dim strContent As String strDummy = "<menu xmlns=""http://schemas.microsoft" strDummy = strDummy & ".com/office/2006/01/customui"">" For lngDummy = 0 To 5 strContent = strContent & _ "<button id=""MyDynaButton" & lngDummy & _ """ label =""Dynamischer Eintrag " & _ lngDummy & """/>" Next strDummy = strDummy & strContent & " </menu>" XMLString = strDummy End Sub
Sie finden dieses Beispiel auch in der Beispieldatenbank 2