EditBox - getText

Der Callback liefert an die EditBox einen String für den Inhalt der EditBox

Beispiel XML Ribbon Datei:

<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" onLoad="CallbackOnLoad">
    <ribbon startFromScratch="false">
        <tabs>
            <tab id="MyTab" label="Beispiel EditBox">
                <group id="MyGroup" label="Beispiel EditBox">
                    <labelControl id="myLabel1" label="Beispiel:" />
                    <labelControl id="myLabel2" label="Editbox" />
                    <editBox id="MyEditBox" label="meine EditBox: " 
                      getText="MyEditBoxCallbackgetText" 
                      onChange="MyEditBoxCallbackOnChange"/>
                
                </group>
            </tab>
        </tabs>
    </ribbon>
</customUI>  

Funktion in einem Standardmodul:

Sub MyEditBoxCallbackgetText(control As IRibbonControl, _
                             ByRef strText)
    ' Callback für EditBox welcher Wert in der
    ' EditBox eingetragen werden soll.
    Select Case control.ID
        Case "MyEditBox"
            strText = "Hallo Welt"
    End Select
End Sub

Sie finden dieses Beispiel auch in der Beispieldatenbank 2