getLabel

 

Label dynamisch anpassen

Der Callback gibt den Label für ein Ribbon Control zurück. Der zurückgegebene String darf kein NullString sein ("") geben Sie min. ein Leerzeichen (" ") zurück.

 

 



Beispiel XML Ribbon Datei: 

<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" onLoad="CallbackOnLoad">
    <ribbon startFromScratch="false">
        <tabs>
            <tab id="MyTab" label="Label Demo">
                <group id="MyGroup" label="Dynamischer Label">
                    <labelControl id="myLabel1" getLabel="CallbackGetLabel" />
                    <labelControl id="myLabel2" getLabel="CallbackGetLabel" />
                </group>
            </tab>
        </tabs>
    </ribbon>
</customUI>

Funktion in einem Standardmodul:

Sub CallbackGetLabel(control As IRibbonControl, _
                     ByRef label)
    ' Callback um ein Label dynamisch zu setzen
    Select Case control.id
        Case "myLabel1"
            label = "Uhrzeit:"
        Case "myLabel2"
            label = "Zeit: " & Format(Now, "hh:mm:ss")
        Case "MyButton1"
            label = "Labels aktualisieren"
        Case Else
            label = " "
    End Select
End Sub


Sie finden dieses Beispiel auch in der Beispieldatenbank 2

 

Zurück